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Az Országos Commodore Egyesület lapja 
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HOBBI 
ELEKTRON IK 

Urbán István mérnök áramköreinek szakűzlete 


Budapest VII., Dózsa György út 16. (Dózsa-Jobbágy sarok) 
Nyitva: H-P 10-17-ig Tel./fax: 122-889Z 
(Zárás után üzenetrögzítő) 


Több, mint tíz éve írok a Rádiótechnikában, vezetem a „Zenei hobby elektronika" fe)lécű rovatot. A közölt témák 
nagyrészéhez szaküzletemben - működő minta alapján - vásárolhat panelokat, részegységeket, egységcsomagokat. 

KÍNÁLATUNKBÓL: 


SZÁMÍTÁSTECHNIKA: 


1 — 

C64 bővítők: 

egys. 

éleszt. | 

RT89/3 

PLOFI Datassette cartridge... 

.1200 Ft... 

...1500 Ft 


PLOFI Datassetteipromon. 

.1300 Ft... 

...1700 Ft 


PLOFI Datassette/help. 

. 1300 Ft.. 

...1700 Ft 

RT89/10 PLOFI Fastload cartridge. 

1300 Ft.. 

...1700 Ft 


PLOFI Fastload speedtape... 

.1400 Ft... 

...1900 Ft 

RT90/3 

PLOFI Simon’s cartridge. 

.1300 Ft... 

...1700 Ft 


FINAL III cartridge. 


... 3450 Ft 


ACTION Replay'VII. 


... 3450 Ft 

RT89/11 Fényceruza, szoftverrel. 

...950 Ft... 

...1250 Ft 

RT90/8 

Hangdigitalizáló + szoftver. 

.1350 Ft... 

...1650 Ft 

HE90/8 

Hangkapcsoló. 

. .300 Ft 


RT89/4 

EPROM-égetö. 

.3400 Ft... 

...4500 Ft 


Égető szoftver lemezen. 

.1300 Ft 



Égető szoftverca rtridge. 

.1300 Ft... 

...1700 Ft 


User csatlakozó. 

...300 Ft 


RT91/3 

EPROM-bank (256 Kbájt). 

. 2900 Ft 

...4000 Ft 

RT91/10 IC teszter. 

,3000 Ft.., 

...4500 Ft 

RT91/7 

Datassette gyorsmásoló. 

...600 Ft 


HE91/7 

Datassettefejbeállító. 

...350 Ft 


HE90/12 CPU stop + rését. 

.400 Ft 



. PAGEFOXszővegszerkesztő. 


...3900 Ft.. 


Mini EPROM-bank. 

.2300 Ft... 

...3000 Ft.. 

1 

IBM bővítők: 

egys. 

éleszt. | 

RT91/4.5 

I8M IC teszter + szoftver. 5900 Ft... 

... 9800 Ft 

RT91/11,12 IBM EPROM-égető 




♦ szoftver. 

.4800 Ft... 

.. 9900 Ft 

RT91/6 

48 csat. I/O kártya. 

.3500 Ft 



HE92/2 User-Centtonics csatlakozó.950 Ft 

RT92/3 TTL IC katalógus lemezen.600 Ft 

CMOS IC katalógus lemezen... .600 Ft 

Dióda katalógus lemezen.600 Ft 

Tranzisztor katalógus lemezen ...600 Ft 


ZENE - HANGTECHNIKA: 


RT87/10 Fuzz-box torzító.670 Ft 

RT90/1 KORG DST-1 torzító. 1200 Ft 

.KORG DST-3 torzító.1400 Ft 

HE90/1 KORG OVERDRIVE torzító.920 Ft 

RT87/12 Vau-vau gilárettekl.640 Ft 

RT88/9 Sztereó tremoló 980 Ft 

RT88/7 Shrfter 1200 Ft 

HE90/7 Ktszajúgrtáreloerösítö. 700 Ft 

RT89/5 Sztereó e löe rösítő.1500 Ft 

HE91/12 Hangfrekvenciás erősítő.490 Ft 

RT89/8 2x 14Wszlereóerősítő . 990Ft 

RT89/12 2x40 Wszlereó erősítő.1800 Ft 

RT89/1 100 W-os erősítő.1600 Ft 

RT90/3 Rilmusgép 32 ritmussal.2500 Ft 

RT90/10 Dobszintetizátor.3500 Ft 

RT88/3 Süvöltő gitáretfekt.780 Ft 

RT87/11 Ringmodulátor.995 Ft 

RT92/4 Oktávemelő.700 Ft 

.Visszhangosító MN3005-tel.4800 Ft 


VIDEÓS TÉMÁK: 


RT92/6 RGB generátor.1760 Ft 

RT92/11 PALkóder.1400 Ft 


FÉNYTECHNIKA: 


RT88/10 Diszkólény II (triak nélkül).1400 Ft 

Diszkófény II (triakkal).3000 Ft 

RT88/12 Fényorgona.2000 Ft 

RT90/2 Programozható futólény. 1200 Ft 

RT91/1 8 x 8-as fénymátrix 

+ 16 K EPROM.2000 Ft 

8 x 8-hoz LED panel 

10 mm-es LED-ekkel.2000 Ft 

RT89/6 Kivezérlésjelző.700 Ft 

RT91/8 Sziporkázó színgyűrü.650 Ft 

Kétszínű LED.48 Ft 

HE91/10 Karácsonyifényjáték.700Ft 

HE92/8 Knight Rider futófény.950 Ft 


EGYÉB HOBBI TÉMÁK: 


RT88/10 Dallamgenerátor Z80-nal. 1500 Ft 

HE91/1 Dallamgenerátor UM3481 -84 .800 Ft 

HE91/5 Dallamgenerátor UM66Txx.480 Ft 

HE91/4 Beszédfelismerő VCP200-zal.750 Ft 

VCP200.1950 Ft 

HE91/2 Kutya ugatás szintetizátor.800 Ft 

RT91/8 Eb-vezérlő.400 Ft 

HE91/6 Szúnyogriasztó.700 Ft 

HE91/9 Multisziréna.480 Ft 


Az árak a 25% ÁFA-t tartalmazzák! 


Választékunk folyamatosan bővül! A Rádiótechnikában, a Hobby Elektronikában megjelent 
nyák-tervek alapján készült nyomtatott áramköri lapok az üzletben megvásárolhatók. 




MŰSZERVÁSÁR 

Bontott anyagok, 
használt műszerek 
böngészdéje 


Az üzletben megvásárolhatók az RT évkönyvei, a Rádiótechnika és a Hobby Elektronika korábbi számai. 


Vidéki olvasóknak segít a szerző levelező, egységcsomagküldó 
szolgáltatása: a megrendelt csomagot postán utánvéttel 
elküldöm. Telefonon/faxon és levélben Is rendelhet. 

A HOBBI ELEKTRONIKÁ-hoz nem kell hosszú levél. Rendelését 
néhány sorban, egyértelműen közölje. 


Levélcím: 1656 Budapest Pf. 50. 




















































































































EGYESÜLET 


Cf 



MIT, HOGYAN, HOL, MIKOR? 

EGYESÜLETI ÜGYEK: Egyesületünknek tagja lehet min¬ 
denki, aki a tagsági díjat befizeti. A tagdíjat személyesen az 
egyesület irodájában (1025 Budapest, Vöröstorony utca 29. 
Telefon: 1-76-22-57), vagy átutalással az MNB 217-98 292, OTP 
565-3610-8 számlára lehet befizetni. Megrendelés esetén szám¬ 
lát küldünk. 

Pötyögőszolgálatunk valamint a szervizkedvezmény és az 
apróhirdetés lehetősége tagjaink rendelkezésére áll. 

A DEÁKPÁHOLY tagjai minden hónapban megkapják a 
C-újságot, a tagsági díj egy egy évre 890 Ft. 

A PLUSZPÁHOLY tagjai minden hónapban megkapják a 
C-újságot, és kapnak havonta 3 db vásárlási utalványt. A tagsági 
díj egy évre 2050 Ft. 

A SZUPERPÁHOLY tagjai havonta 15 példányt kapnak a 
C-újságból, és ezzel havonta 15x3 db vásárlási utalványt is. Az 
éves tagsági díj 24 000 Ft. 

ÜGYFÉLFOGADÁS: Minden kedden és csütörtökön 12—16 
óra között járjuk tagjainkat és az érdeklődőket. 
PÖTYÖGŐSZOLGALAT: Az újságban megjelenő programo¬ 
kat másolja a megrendelők részére. Megrendelhető személyesen 
az egyesület irodájában vagy postai utánvéttel. Postacím: 1388 
Budapest 62., Postafiók: 86. 

APRÓHIRDETÉS: Az egyesületi tagoknak ingyen áll rendel¬ 
kezésére. Nem tagoknak a hirdetés ára 100 forint. A hirdetés 
módja: az újságban megjelenő nyomtatvány kitöltésével. 

A C-ÚJSÁG RÉGEBBI SZÁMAI megvásárolhatók az egyesü¬ 
let irodájában, vagy megrendelhetők utánvéttel. 

Kedvezményes ár! Tagoknak olcsóbb! 

Az újságban eddig megjelent programok gépenként össze¬ 
gyűjtve megrendelhetők. VC 20, C16, PLUS/4, C128, C64. To¬ 
vábbi felvilágosítást is adunk a 1-76-22-57-es telefonszámon vagy 
levélben! 

Vidéki pluszpáholy-tagjaink háromhavi tikett összegyűjté¬ 
sekor igénybe vehetik a NOVOTRADE 2C Áruház csomagküldő 
szolgálatát. 

VIDÉKEN TOVÁBBI INFORMÁCIÓK KAPHATÓK: 

Baja, AXIS Kft., 

Győri Bartók Béla Művelődési Ház, 

Jászberényi Városi Könyvtár, 

Kecskemét, SZIGMA—BIT, 

Pécsi Apáczai Csere János Gimnázium, 

Zalaegerszegi Ságvári Endre Gimnázium. 


Az Országos Commodore Egyesület módszertani kiadványa 

Egyesületi iroda és szerkesztőség: 

1025 Budapest, Vöröstorony utca 29. Telefon: 1-76-22-57 

Felelős kiadó: Horváth Judit, az egyesület elnöke 

Főszerkesztő: Rados Péter, az OCE főtitkára 

Felelős szerkesztő: dr. Horváth András 

Művészeti szerkesztő: Bausz Sándor 

Levélcím: Commodore Újság, 1388 Budapest, 62. Pf.: 86. 

Index: ISSN 0237-756 X 

Terjeszti a Magyar Posta 

Megvásárolható a hírlapárusoknál 

92.0305 MSZH Nyomda és Kiadó Kft., Budapest 

Felelős vezető: Nagy László 


C-64 C+4 AMIGA PC 


tulajdonosok! 

Várunk benneteket az Országos Commodore 
Egyesület klubdélelőttjén a Havanna Közösségi 
Házban minden hónap 3. vasárnapján, délelőtt 9 
órától. Gépet és hosszabítót hozzatok! 

Cím: 1181 Budapest, Kondor Béla sétány 8. 
Megközelíthető: a metró kőbánya-kispesti végál¬ 
lomásától a piros 136-os busszal. 

Legközelebb: 

április 18-án. 


FELHÍVÁS 

Tisztelt Tagtársunk, Olvasóink! 

Kérjük, hogy ha rendelkeznek olyan működő számító¬ 
géppel, vagy jó állapotban lévő bármilyen számítógép¬ 
tartozékkal, amire nincs szükségük, akkor hozzák el 
egyesületi irodánkba (minden héten kedden és csütörtö¬ 
kön 11—15 óra között). 

Mi összegyűjtjük és eljuttatjuk azokat határainkon túli 
(erdélyi, kárpátaljai és szlovákiai) magyar iskolákhoz. 
Köszönettel: 

Országos Commodore Egyesület 


Tisztelt Szerkesztőség 


Nagyon megirigyeltem a PC-k két lemezes szolgáltatását, 
és megpróbáltam átültetni őket a C64-re is. Alapvetően két cé¬ 
lom volt: a filc-ok könyvtáradatai között az utolsó javítás dátu¬ 
mának feljegyzése, valamint annak automatikus jelzése, hogy a 
file-t az utolsó archiválás (másolás) óta módosítottuk (hasonlóan 
a DOS Attrib parancsához). 

A programot használhatjuk gépi kódú szubrutinként, SYS 
49155,... alakban; vagy a BASIC beépített elemeként, akár prog¬ 
ramban is. A bővítést be- és kikapcsolni a SYS 49152 utasítással 
lehet. (Figyelem: a két cím nem egyezik!) Ennek hatására a 
program a beszúrások láncának elejére fűzi be magát, az IGONE 
($0308/09) vektor átírásával. A korábban bekapcsolt bővítések 
nem változnak. A program az aposztróf (’) kulcsszóval hívható. 

Egy ’ parancs önmagában egy help-listát ad a használható 
parancsokról. A szintaxis a következő: 

’ parancsok ”filenév” paraméterek 
A "filenév” a szokásos, 16 karakter, dzsóker jelekkel, 
ahogy azt egy rendes 1541-es meghajtóval kell. Megadásával elő¬ 
írhatjuk azokat a file-okat, amelyekre a kiadott parancsok érvé¬ 
nyesek. Ha paramétereket is akarunk használni, akkor legalább 
egy ”” filenév megadása kötelező, ez egy " * "-gal egyenértékű. 
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EGYESÜLET 


A paraméterekkel szintén a parancsok érvényességi körét 
lehet szűkíteni. Alakra megegyeznek a parancsokkal, használa¬ 
tuk nem kötelező. 

A parancs határozza meg a lemez könyvtárában elvégzendő 
módosításokat. Összesen 7 parancs használható, ezek a kö¬ 
vetkezők: 

$ a bejegyzések listázása képernyőre. Ha a paraméterek között 
használjuk, akkor a módosítás előtti állapot látható. A filene- 
vek megjelenése, ha azokban különleges karakterek vannak, 
eltér a szokásostól, annál általában olvashatóbb. A típus neve 
mellett egy ,,+” jelzi az archív bit magas állását, jobb-oldalt 
a bejegyzett dátum látható, ha az nem csupa nulla. 

D operátori dátum: a ,,D < =92091017” paraméter esetén a pa¬ 
rancsok csak olyan lile-okra hatnak, amelyek neve mellett 
1992.09.10, 17 óra értékű vagy annál kisebb időpont van felje¬ 
gyezve. Parancsként kiadva a bejegyzés a megadott értéket 
veszi fel, figyelmen kívül hagyva az operátorokat. Operátor 
megadása nem kötelező, alapértelmezés az,, =”. Ha a dátum 
8 jegynél rövidebb, a hiányzó jegyek helyére 0 kerül. 

Sajnos a dátum kezelése nem automatikus, ehhez a le¬ 
mezegység operációs rendszerét kellene bővíteni. A megfe¬ 
lelő dátumot a fiié létrehozása vagy módosítása után nekünk 
kell beírnunk. A dátum a file-bejegyzések 24—27. számú, 
másra nem használt byte-jaiba kerül, ezeket a DOS nem 
bántja. 

L operátor hossz: az ,,L>15” paraméter esetén a parancsok 
csak olyan filc-okra hatnak, amelyek bejegyzett hossza na¬ 
gyobb 15 blokknál. Ha operátort nem használunk, a program 
egyenlőséget keres. Parancsként használva a hosszbejegyzés 
értéke a megadott számot veszi fel. 

T típus: a paranccsal beállítható a megadott file-ok típusa. Pa¬ 
raméterként a program a ,típus” sál való egyezést keresi. A 
„típus” egy betű lehet: Del, Seq, Prg, Usr, Rel. 

A kapcsoló: a „kapcsoló” értéke ,,+” vagy ’ lehet. Pa¬ 
rancsként az „archív” bit magasra/alacsonyra állítható, pa¬ 
raméterként pedig a megadott állapotot keresi. 

Ez az a jelzés, amellyel a módosítás ténye felfedezhető. 
Megtehetjük ugyanis, hogy egy készülő nagyobb program 
file-jait megjelöljük minden olyan esetben, amikor azok pil¬ 
lanatnyi változatáról egy tartalék ún. archív másolatot készí¬ 
tünk. Erre a célra a lile-bejegyzések 2. számú, „típus” byte- 
jának a 4. ($10) bitjét állítsuk magasra. Ha egy soros típusú 
(D,S,P,U) file-l írásra (W,A) sikeresen megnyitunk, vagy egy 
relatív (R) típusú file-ba írunk, akkor a DOS ezt a bitet auto¬ 
matikusan 0-ra állítja be. így megállapítható, hogy mely file- 
okról nincs még meg a legutolsó tartalék kópiánk. Kár, hogy 
a másolóprogramok ezt a bitet nem kezelik önállóan. 

P kapcsoló: a törlés ellen védett állapot állítható be vagy figyel¬ 
hető így. A bekapcsolt állapotot a katalógusban a típustól 
jobbra egy ,, <” jel mutatja. 

C kapcsoló: a jelzőbit akkor magas, ha a fiié írás után szabályo¬ 
san le lett zárva. Ellenkező esetben a katalógusban a típustól 
balra egy " *" jel látszik. Az ilyen file-ok csak ,,M” módban 
.y „hatók meg, nem olvashatók, és validáláskor törlődnek. 
Hadd mutassak néhány példát: a ’$” ”TPL> 10 parancs az 
összes 10 blokknál hosszabb programfile adatait listázza ki. 
’A+P—D9205”/*”A—D0 az összes ”/*”gal kezdődő nevű, ala¬ 
csony archív bitű és nem dátumozott file-nak az archív bitjét ma¬ 
gasra állítja, törli az esetleges törlésvédelmet, és 92050000 dátu¬ 
mot ír melléjük. ’C + $””C—L>0 visszaállítja az összes törölt 
file-t, és katalógust is kapunk róluk. (Ezután még egy validálás 
szükséges lehet.) 

A parancs elemeit nem szabad vesszővel elválasztani. A 
S YS-szel történő híváskor a cím után egy vesszőt kell írni. A sza- 
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O o 

0 rém *** attrib * 43152 J 

I rém (c) hódi gyula - 9209 
q 6 read v,w: 1=15: a=v+w*256 

° 7 S=0: print *8*1: read ví.c: if vi='“ then 13 j 
8 fór 1=1 to lenCv/S) step 2 
q 9 v=<asctmlditv$,1))-65>«16+asc<mld$(v$,1+1)>-65 
10 poke a,v: a=a+l 

II s=s+v: next 1 : lf s=c then 1 = 1 + 1 : goto 7 

O 12 print 1 ” 1 J. sor hibás - ^ 

^ 13 end 0 

14 data 0,192 

Q 15 data emajmacapnkoemiimákjaanaboknalad, 1731 q 

16 data koajadlnlgmaioihmakjgnkcmainaiad,1906 

17 data 1oajadkjedkamakcabnabcknlgmakoih,1939 

O data mainaiadloajadkjgbkamakcaaloakma, 1622 q 

19 data emboklebfefefcejeccadbcodbcacnca,1016 

20 data fefJfaefcachcaegepfccaeiefemfaan,998 

O 21 data aaebfefefcejeccaepegeganaacahdaa,865 Q 

22 data mjchnaaJcahdaacaiimaemkokhkfhkna,1876 

23 data acmghlmghkemoekhcamcmacancmacaph,2245 

o 24 data macaofmacancmacaglmccaphmakndoad,2118 Q 

25 data andpadnaadempomgcalnmcgakcalemdh,1633 

26 data kecaagmdcanhkkemhekedbcodbcaeeeb, 1479 

C 27 data fgefkcapkjkajneaadkjaajnfaadmkba,1512 Q 

28 data pdgakcakkJaajngjadmknapklndoadkJ,1980 

29 data ahingoadgakcakIngjadjnfpadmknaph,1738 

O 30 data kndoadlndpadgacahjaapacdmjccpabp,1475 0 

31 data kcagnncambpaagmkbaplemkmmalnchmb,2187 

32 data inbkmblncomblnblmbcappppemphmaga,2302 

O 33 data ceeefeebfaedemdfeaomcacfck11mbmb,1513 Ü 

34 data nibmcmcmcmbkndoadaJab1ndoademhdaa, 1613 

35 data kjaaifkh1fkiifkJ1fkkcahdaapadgkg,1982 

ki 36 data kknaafcajombpapcogkkcak1odlacgkg,2458 Q 

37 data kinaacogkhkekhmaafpabkmkpaalakak,2042 

38 data akakJjgjadogkinanbcjapbjgjadjJgJ,1543 

39 data admgkipamfkfkJnaajkekhnaadkjahem,2119 

40 data kjablngoadkndoadajaclndoadgamjlc,1354 
q 41 data naaekjabnaaomj1dnaaekjacnaagmj1b, 1959 

42 data naalkjaeafkjifkjkjaagakjaaifkJca,1633 

43 data hdaapadfcajombpapgcaklodlaclcalk,2096 
0 44 data kncaph1himhbadinhcadkfkJnaackJab,1863 

45 data lnhdadkndoadajal1ndoadgacahdaakc,1125 ^ 

46 data aennblmcpaagmkbaplemkmmalgkhkngp, 2183 
q 47 data adcjplafkhingpadknhaadajahinhaad, 1279 

48 data kndoadajaeindoademhdaaeefdfafffc,1046 

49 data kJbaemepmekJeaemcpmckJ1aemcpmc1f, 1799 

0 50 data khejppifkicahdaamjkknaakkngpadaf, 1824 q 

51 data khingpadnaapmjk1paademkmmakngpad,1987 

52 data cfk11ngpadknhaadafkhinhaadkndoad,1414 

0 53 data ajaelndoademhdaakjaaifkjcahjaapa,1274 q 

54 data dgmjccnadkcahdaapacnmjccpacgmjdp,1764 

55 data naamkgkj1nfaadajabjnfaadnaajmjck,1537 

0 56 data naafkgkjcalemekgkjoabapabcjneaad,2009 q 

57 data ogkjnanbcahdaakgkjnaadcalcmcgaem,2085 

58 data kmmakjiajnfaadoioabanapigacanhkk,2342 

O 59 data kflkmjaiJaaemjanijaaekJai1f1kcacc, 1631 Q 

60 data mdcaojmccacnmdcaommdcalomdcaagmd,2039 

61 data canhkkcancmfemjnmgkjaikglkkaalca,2016 

O 82 data 1kppkJabkcafkamdcalnppcamappcajb,2265 Q 

63 data mgcaaomdgacdkJaicamdppemohppkndp,2027 

64 data adcjpopaamkjbckkcacerngk Jbckkcacl, 1602 

O 85 data mggakJelkamdkcacemhfmgejdakndpad,1776 q 

66 data andoadcjabpadecancmfkJbckcaacace, 1268 

67 data mgkcjacanmmfkJcclnleadkJgmkamdkc,2226 

O 68 data aecaphmgkJhekaadkcbhcaphmgkJaaif,1893 q 

69 data mhkJhakamdcaboklcahlmdgadacabccc,1646 

70 data cacaebcacaeeebfeefanaakjaaifiaif,l103 

O 71 data Ibifkjkcaecagdmgkcaicamgppogkjka,2188 0 

72 data aacaoeppjjphaamlmaaenapfkfkjmjbe,2317 

73 data paolmjcepabfkcblegpiggpjggpkJaag,2330 

O 74 data oglanaacoglbmknaoppancemmmppkndp,2893 Q 

75 data adandoadcjabpabecancmfkglakf1bca,1538 

76 data mn1nkjnnkamdeabok1cakhmggacaecem,2039 

77 data epedelfdcaegfcefefcoanaakjbckcab,1035 O 

78 data if1 elglfcacemgkcaaigk1iglgcanmmf,2126 

79 data cadnmejabckndoadcapfmecalkmecaae,1612 
- 80 data mgkndpadcapfmecaobppnaademlbmabl ,2102 

81 data kf1ggJcalf1gkkJanekfklpaahkf1ekg,2419 
0 82 data 1fcacimgkojfadknjeadnalegakcapln,1951 
83 data faadk1dabelnhjadmjkapaaiJ1ejabna,1643 
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84 data ailnhjadnneaadnafpmkbaodkndoadcj,1636 

85 data aepaalknhgadcnhaadmngpadnaekkndo,1545 

q 86 data adcjacpabokcaalnimadnngkadjaakna,1502 Q 

87 data aloioaaenapbkjabcmkjaccmkjaecngo,1677 

88 data adpacfkndoadcjalpabmkcablnjcadnn,1557 

0 89 data hbadjaalnaajmkbapdkJabcmkjaccmkj,1544 Q 

90 data aecnhdadpaacdigablgakndpadcjacpa,1203 

91 data alkcadlngaadjnlmadmkbaphkndpadcj,1509 

Q 92 data aepaaoknggadejppcnhgadangfadlnhg,1406 O 

93 data adkndpadcjalpaamknghadkogladlnjc,1390 

94 data adlojdadgacjabnaabgacancmfkojcad,1500 

Q 95 data knjdadcamninkJaf 1 fndkjcccancppka,2127 O 

96 data aalen1kjpplfkjkcbaljhjadmjkanaal,2141 

97 data ogkjnaahkjcccancppkjkaognicancpp,2586 

Ü 98 data mlmknaofkfkjbaafkjcccancppknhgad,2188 O 

99 data cjianaadkjckcmkjcacancppknhgadcj,1668 

100 data ahifkjakgfkjkkkaadln1kmfcancppoi,2223 

O 101 data 1InapgknhgadcjeapaadkjdmcmkJcaca,1738 O 

102 data ncppknhgadcJbapaadkJelcmkJcacanc,1758 

103 data ppkjbolfndkjaakcadbnimadmkbapkkk,1942 

O 104 data pacfkcaalnlmadeiekekekekajdacanc,1438 O 

105 data ppglejapajdacancppoaacnaafkjcnca,1654 

106 data ncppoloaaenannemnhkkeeefemfdeffb,2261 „ 
O 107 data fafcéhfffdfcfcefemcndpcncndpcncn,1061 O 

108 data dpenkJcakachJbnbl1baplgacagdmgkc,1852 

109 data alcamgppkaaacaoeppjjheadmlmacana,2072 
0 110 data pfkflgnaamknheadkohfadlnjeadlojf, 1981 

111 data ademmmppkndpadcjponaabgakglgcagd,1856 

112 data mgkcaicamjppkJhekaadkccacaphmgog,2205 _ 

O 113 data klemmmppkadbnaackadclmepmgelcano,2078 ^ 

114 data mglof1 mg 1 rnfJmggikkcanomgioffmglm,2344 

115 data fgmgkjeokamgkcamcahfmgemjbmgffda,1962 

^ 116 data dkdlcadacadadacadadaeccnfadkdica,787 ^ 

117 data dadadacanomglngarnglogbmgimgcmgkj,2073 

118 data fkkamgkcaj1 fociecdkfi kcalbppkjgp,2048 q 
^ 119 data cajdppkaaalbcccak1ppmimknaphemko,2367 

120 data ppcakhmgpaagcajnmgemlbmagacancmf,2265 

121 data kjaakaabembok 1 kf 1 kcaleppkjgpcajg, 1887 „ 
O 122 data ppca1hppdacakaaacakfppjJaaabmlda, 1819 

123 data aemjannapdkjaajJaaabcakoppknaaab,1627 



bad blokkok számát a program nem a sávonként szabad blokkok 
bejegyzett számának összesítésével kapja, ahogy a DOS, hanem 
megszámolja a BAM-ban szabadnak jelzett blokkokat. Normális 
esetben a két számnak egyeznie kell. 

A megjelenő katalógus egy válogatás eredménye. így tehát 
láthatóak lesznek a lezáratlan, törölt file-ok és a még felhaszná¬ 
latlan bejegyzések is, ha a válogatás szempontja erre nem terjed 
ki. Javaslom tehát a ,,C+” paraméter megadását minden olyan 
esetben, amikor nem akarunk törölt file-okkal foglalkozni. Kü¬ 
lönösen fontos lehet ez az ,,A+”, ,,C+”, ,,P+” parancsok ki¬ 
adásakor, mivel a közönséges (L0AD”$”,8) katalógusban min¬ 
den olyan lile megjelenik, amelynek a típus byte-ja $00-nál 
nagyobb. Szűrőparaméter nélkül véletlenül aktiválhatunk nem 
létező lilc-okat is. 

Néhány technikai információ következik. A program min¬ 
dig a legutoljára használt, illetve a 8. számú lemezegységet hasz¬ 
nálja. Módosító parancs megadásakor előzőleg ellenőrzi a lemez 
írhatóságát. A parancs után kettősponttal elválasztva újabb pa¬ 
rancsok (vagy utasítások) is kiadhatók. A program a 8-as file-t 
használja, majd minden megnyitott lilc-t lezár. Terjedelme 8 lap, 
$C0()0—$C7F3-ig. Munkaterületként használja a $033E—0395 
területet, és számos byte-ot a 0. lapon. A Pötyögőszolgálat szá¬ 
mára mellékeltem az assembly forráskódot is. 

Szólnom kell a program hiányosságairól is. Mivel a lemez¬ 
egységgel DOS-parancsok révén kommunikálok, ami elég hosz- 
szadalmas, ezért a program kissé lassúnak tűnik. Hasonló okból 
nem tudtam megoldani, hogy a katalógus listázása átirányítható 
legyen más perifériára, nyomtatóra is. Szokatlan a listázás mód¬ 
ja, a C paraméter állandó használatával. És végül sokallom a 
program hosszát, de sajnos az interpreter nem tartalmaz blokk¬ 
kezelő rutinokat. 

Az átadott feltöltős alak a teljes programot tartalmazza. Aki 
egyből lemezre kívánja íratni, az végezze el az 1. mellékletben 
látható javításokat. Ha valaki sokallja a program méretét, az a 
2. melléklettel megtakaríthat egy lapot a help-lista kiiktatásával. 
Megjegyzem még, hogy a feltöltő kódolási rendje nem az én öt¬ 
letem, és nem tömörítve, hanem csak sajátos alakban tartalmaz¬ 
za a gépi kódot. 

Üdvözlettel 

Hódi Gyula 




Tisztelt Szerkesztőség! 

Aki lemezekkel rendelkezik, és pedánsan rendben akarja 
azokat tartani, az rendezheti azok tartalomjegyzékét, többek kö¬ 
zött SEPARATOR-t helyezhet el a direktoriban. Ehhez egyes 
programok rutinnal rendelkeznek (pl. TRECK-18, DISK MA¬ 
NAGER), de hasonló beavatkozást elkövethetünk monitorprog¬ 
ramokkal is. 

Ha ilyen feladathoz látunk hozzá, tudni kell, hogy ebből kel¬ 
lemetlenségek származhatnak! Egész lemezünk tönkremehet, és 
nem okolhatjuk a lemezegységet, csak a saját tudatlanságunkat! 

Munkalemezre csak olyan SEPARATOR (elválasztó) rakha¬ 
tó a direktoriba, amihez létező blokk is tartozik! 

Gondoljunk például arra, mit művel a lemezegység VALI- 
DATE alatt; keresi a filenévhez tartozó blokko(ka)t. Ha nem ta¬ 
lál, mindenképpen kárt tesz a lemezünkben! 

A másik nem tetsző dolog lehet később a DRIVE-nek, ha 
a típus (adott) SEPARATOR-ok azonos nevűek! 

Persze mindezek csak további lemezműveleteknél okozhat¬ 
nak hibákat! Ha úgy gondoljuk, hogy a lemezt zároljuk, tehetünk 


bele SEPARATOR-okat, de azonnal védjük is le írás ellen! 

Én szívesen használom a SEPARATOR sajátos formáját: kis 
programokat (1—2 blokk) írok, amelyek valójában feljegyzések, 
RUN után olvashatók a „magvas” gondolatok. Ezek később ne¬ 
künk is segíthetnek, de másokkal is közölhetjük a — lemez keze¬ 
léséhez szükséges — tudnivalókat. 

Ezeket a programokat speciális névvel mentem lemezre: 

SAVECHR$(X)+ "-",8 

X értékét 1—12-ig javaslom, amelynek hatására REVERS 
ABC... jelenik meg, mögötte 15 db gondolatjellel! 

Az eredmény: 

— szemléletes direktori; 

— lemezünk a kezeléséhez szükséges információkat is tar¬ 
talmazza; 

— a lemezműveletek pontosak lesznek. 

Ezzel a módszerrel a munkalemez is csinosítható! 

Utólag is lemezre írhatjuk e SEPARATOR programokat, 
felírás után a direktori már a szokásos módon rendezhető; vagyis 
cserével minden a helyére kerülhet! 

Mesterházi Sándor 
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Tisztelt Szerkesztőség! 

Három miniatűrömet küldöm ezúttal. Mindegyik táblázatot 
nyomtat; kettő speciálisat, egy általánosat és szabályozhatók 
Táblázatnyomtató: 

Három típusú (négyzetes, téglalapos) rácsozattal készít táb¬ 
lázatot a meghatározandó méretben és helyen. Választás után a 
megengedett rácsszámot kiírja! Használható saját táblázatok 
szerkesztésére, akár szubrutinként is. 

Változó tervezőlap nyomtató: 

Nagyobb programok írása esetén szükség lehet a változók 
nevének megtervezésére, nyilvántartására. Ehhez nagy segítsé¬ 
get nyújthat a kinyomtatott tervezőlap: egy a szövegváltozók, egy 


a számváltozók részére. Kinyomtatás után írja fel, hogy melyik 
típusra használja! 

Használat előtt már be is jelölheti azokat a mezőket, ame¬ 
lyek használata tilos: G/0, I/F, O/N, O/R, S/T, T/I, T/O. 

ID. nyilvántartólap nyomtató: 

Sokszor okoz fejtörést, milyen ID. számú lemezünk nincs 
még; azonos ID. esetén filéink tönkremehetnek. Rend a lelke a 
hibák elkerülésének, ebben segít a kinyomtatott táblázat. 

Száznál kisebb számú lemez esetén célszerű csak a számo- 
kathasználni, mint sorszámokat. (Ez azonban csak egy javaslat.) 

Tisztelettel 
Mesterházi Sándor 


o 

100 

RÉM *************************** 

O 


110 

RÉM * TABLAZATNYOMTATO * 

o 

120 

RÉM * SOFT: MESTERHÁZI SÁNDOR * 


130 

RÉM * CELLDOMOLK * 

O 


140 

RÉM * C64 & CITIZEN120-D * 


0 

150 

RÉM *************************** 

O 


160 

GOTO370 


0- 

170 

0PEN4,4,1:CL0SE4:IFST=0THEN210 

O 

180 

PRINT,"CJWOMTATOHIBA! ":PR I NT,"BILLENTYURE VAROKIG" 


190 

GETAÍ:IFAÍ=""THEN190 


o 

200 

GOTO170 

O 


210 

0PEN1,4: PRINTttl , CHR$ (27) "1" ; 


0 

220 

PRlNTttl, CHR$(27)CHR$ ( 109)CHR$ (4) ; 

O 


230 

PRINTttl, CHR$(27)"Ul"; 

0 

240 

IFP$ = "H"THEN290 

O 

250 

PRINTttl, SPC(BM)P1$ :PRINTttl, SPC(BM)P0$ 


260 

IFTH=1THEN280 


o 

270 

FÓR I = 1T0TH - 1 : PR I NTtt 1, SPC ( BM ) P2$ : PR 1 NT ttl,SPC(BM)P0í: NEXT 1 

O 


280 

PRlNTttl, SPC(BM)P3$ :GOTO330 


o 

290 

PR I NTtt1,SPC(BM)P1 $ 

Q 

300 

I FTH=1THEN320 


o 

310 

FORI =1T0TH-1 : PR 1 NTtt 1, SPC (BM)P2$: NEXT I 


320 

PRINTttl,SPC(BM)P3$ 

o 


330 

PRI NTtt 1 , CHRÍ (27) :CL0SE1 


o 

340 

PRINT,"Ga UJ TABLAZAT( I ) ? " 

o 


350 

GETAÍ:IFAÍ=""THEN350 


D 

360 

IF A $ < > H I"THENEND 

o 


370 

PRINT"02 C64 & CITI ZEN 120-D TABLAZATNYOMTATO 


380 

PR INT"SOFT: MESTERHÁZI SÁNDOR CELLDOMOLK 1992." 


o 

390 

PR INT" A RÁCS FORMA J A : " : PR I NT" -t—f" 

o 


400 

PRINT" l 1=N" 


o 

410 

PRINT" -t—ta?IgW 

o 

420 

PRINT, 


430 

PRINT, "H—1-= HUglSB" 

o 

o 

440 

PRINT, , "-H-" 


450 

PR I NT, , " 1 1 =F EJ VEGE g=V" 


o 

460 

PRINT, ,"++”:PR 1 NT:PR I NT:CLR 

o 


470 

INPUT"GVALASZTASA ";P$ 

o 

480 

IFP$0"N"ANDPÍ <>"H"ANDP$<>"F"ANDP$O"V"THEN470 

o 

490 

PRINT:1FP$="V"THENEND 


500 

I NPUT"BAL MARGÓ";BM 


o 

510 

PRINT:PRlNT:MX=(78-BM)/2:IFP«="F”THENMX=MX*2 

o 


520 

PRINT"GTABLAZAT SZELESSEGE(MAX"MX")";:INPUTTS 


0 

530 

IFTS>MXTHEN520 

o 

540 

PR I NT:TS = TS- 1 

o 

550 

INPUT"TABLAZAT MAGASSAGA "jTH 


560 

PRINT, "^ISBJOK AZ ADATOK ( I ) ?" 

o 


570 

GETAÍ: IFA$ = ""THEN570 


o 

580 

IFA $ < >"1"THEN370 

o 


590 

PRINT, "□ RENDBEN, KÉSZÍTEM ! " 
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o 

o 

o 

o 

o 


600 IFP$="F"THEN730 u 

610 P1$=CHR$(176)+CHR$(192) 

620 F0RN=1T0TS:P1$=P1$+CHR$(178)+CHR$(192): NEXT O 

630 P1$=P1$+CHR$(174) 

640 P2$=CHR$(171)+CHR$(192) Q 

650 F0RN=1T0TS:P2$=P2$+CHR$(123)+CHR$(192):NEXTN 
660 P2$=P2$+CHR$(179) 

670 P3$=CHR$(173)+CHR$(192) O 

680 FORN =1T0TS:P3$=P3$+CHR$(177)+CHR$(192) :NEXT 

690 P3$=P3*+CHR$C189) q 

700 FORN=1T0TS+1:P0$=P0$+CHR$(221)+CHR$(32):NEXT 
710 P0$=P0$+CHR$(221> 

720 GOTO 170 O 

730 P1*=CHRÍ(176) 


O 

O 

O 

O 

O 

O 


740 FQRN=1T0TS:P1$=P1$+CHR$(178) : NEXT 
750 P1$=P1$+CHR$(174) 

760 P2$ = CHR $(171) 

770 FORN=1T0TS: P2$ = P2$ + CHR$(123) :NEXTN 
780 P2$=P2$+CHR$(179) 

790 P3$=CHR$(173) 

800 FORN=1TOTS:P3$=P3$+CHR$(177):NEXT 
810 P3Í=P3$+CHR$(189) 

820 F0RN=1T0TS+1:P0$=P0$+CHRÍ(221):NEXT 
830 P0$ = P0$+CHR$(221 ) 

840 GOTO170 


O 

O 

O 

o 

o 


0 

100 

RÉM **#»*#*#** **»*»»«»«#»**#* tt * 


0 


110 

RÉM * VALTOZO TERVEZOLAP IRO * 



o 

120 

RÉM » SOFT: MESTERHÁZI SÁNDOR # 


o 


130 

RÉM * CELLDOMOLK * 



o 

140 

RÉM » C64 te C 1 T I ZEN120-D * 


o 

150 

RÉM *#*###***#*#»»#*#*»##*»»**« 


o 

160 

PRINT"CHVALTOZO TERVEZOLAP IRO C64&C1T1ZEN120-D 

w • 

» 


170 

PR 1NT"SOFT: MESTERHÁZI SÁNDOR CELLDOMOLK 1992." 


o 


180 

A$=" ABCDEFGHIJKLMNOPRSTUVWXYZQ" 



o 

190 

B$=A$+"0123456789%" 


o 


200 

P1>=CHR$(176)+CHR$(192) 


o 

210 

FORI=.T024:P1*=P1$+CHR$(178)+CHR$(192):NEXT 


o 

220 

P1 $ = P1 $ +CHR$(174) 



230 

P2$=CHR$(171)+CHR*(192) 



o 

240 

FORI=.T024:P2$ =P2$ + CHR$(123)+CHR$(192):NEXT 


o 


250 

P2$=P2$+CHR$(179) 



o 

254 

P3$=CHR$(173)+CHR$(192) 


o 


256 

FORI=.T024:P3$=P3í+CHR$(177)+CHRÍ(192):NEXT 



258 

P3$=P3$+CHR$(189) 



o 

260 

FORI=.T025:P0$=P0$+CHR$(221)+CHR$(32):NEXT 


o 


270 

P0$=P0$+CHRÍ(221) 



o 

272 

P0KE214,8:PRINT:PRINT,"NYOMTATÓ RENDBEN(I) ?" 


o 


274 

GETX$:IFX*<>"I"THEN274 



o 

276 

PRINT,"[RENDBEN, NYOMTATOK ! " 


o 

280 

0PEN1,4 



290 

PR I NT #1,SPC(12)"V ALTOZOTABLAZA T":PRINT#1 


o 

292 

PRI NT(t 1, SPC( 10) "PROGRAM NEVE:." : 

PR I NT#1 

o 


294 

PR I NT#1,SPC(10)"VÁLTOZÓTIPUS:. 

" : PR 1 NT#1 


o 

300 

PR I NT#1,CHR*(27)"1" ; 


o 

310 

PRINT#1,CHR*(27)CHR$(109)CHR$(4); 



o 

320 

PR I NT#1,CHR$(27)"U1"; 



330 

PR I NT #1," 


o 


340 

FORI=2T027:PRINT#1,MID$(A$, 1,1)" "j :NEXT:PR I NT#1 



o 

350 

PR I NT #1," "Pl$ 


o 


360 

FORI=1T038 
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° 370 PRINT#1,MID$(B$,I,1)P0$ 

375 IFI=38THENPRI NT # 1 , " "P3*:GOTO390 
O 380 PR I NT# 1, " " P2$ 

390 NEXT1 

410 PRINT#1,CHR$(27)"@" 

° 420 PR I NT#1:PR I NT#1,"DÁTUM:. 

430 CL0SE1 

O 440 PRINT, "£J<ESZ! MEG EGY TABLAZAT ( I ) ?" 

450 GETXÍ:IFX$=""THEN450 
q 460 1FXÍ="1"THENPRINT,"□ 

470 END 



KÉSZÍTŐ:." 


":G0T0272 


O 

o 

o 

o 

o 


o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

<J 

o 

o 


100 

110 

120 

130 

140 

150 

160 

170 

180 

200 

210 

220 

230 

240 

250 

254 

256 

258 

260 

270 

272 

274 

276 

280 

290 

292 

294 

300 

310 

320 

330 

340 

350 

360 

370 

375 

380 

390 

410 

420 

430 

440 

450 

460 

470 


RÉM a##**#***#****#******###*## 

RÉM * ID, NY ILVANTARTOLAP IRO * 

RÉM * SOFT: MESTERHÁZI SÁNDOR * 

RÉM * CELLDOMOLK * 

RÉM * C64 & CITIZEN120-D * 

RÉM k#####*#***##**********#### 

PRINT"n2ID. NY ILV1NTART0LAP IRO C64&CITIZEN120-D "; 

PR I NT"SOFT: MESTERHÁZI SÁNDOR CELLDOMOLK 1992." 

A$="ABCDEFGHIJKLMNOPRSTUVWXYZQ0123456789" 

P1 $ = CHR$(176)+CHR$(192) 

FORI=.T034:P1$=P1$+CHR$(178)+CHR$(192):NEXT 
P1$=P1$+CHR$(174) 

P2Í=CHR$(171)+ CHR$(192) 

FÓR I = .T034:P2$ = P2$ + CHR$(123)+CHRÍ(192) :NEXT 
P2$=P2$+CHR$(179) 

P3$=CHR$(173)+CHRÍ(192) » 

FÓR I = .T034:P3$ =P3$ +CHR$(177)+CHRÍ(192) :NEXT 
P3$=P3$+CHR$(189) 

FÓR I = . T035 : P0$ = P0$ *CHR$ (221 ) +CHR'í (32) : NEXT 
P0$=P0$+CHR$(221) 

P0KE214,8:PRINT:PRINT,"NYOMTATÓ RENDBEN(I) ?" 

GETX $: IFX$<>"I"THEN274 
PRINT,"ORENDBEN, NYOMTATOK ! ” 

0PEN1,4 

PR 1 NT #1,SPC(12)"I D. NYILVÁNTARTÓ LA P":PRINT#1 


PRINT(tl,SPC(15)" NÉV: .":PRINTttl 

PR I NT # 1 , SPC( 15) "LAKCI M : ." : PR I NT S 1 

PR 1 NT#1,CHR$(27)"1"; 


PR INT*1,CHR$(27)CHR$(109)CHR$(4); 

PRINT#1,CHR$(27)"Ul"; 

PR I NT#1," 

F0RI = 1T037:PRINT#1,MID$(A$, 1,1)" ";:NEXT:PR I NT#1 
PR I NT#1," "Pl$ 

FORI=1T036 

PR I NT#1,MID$(A$, 1,1)P0$ 

IFI=36THENPRI NT#1," "P3$:GOTO390 
PR I NT#1," "P2$ 

NEXT I 

PRINT#1,CHR$(27)"@" 

PR 1 NT# 1 : PR I NT# 1, "DÁTUM :. KÉSZ I TO :. 

CL0SE1 

PRINT,"CXESZ! MEG EGY TABLAZAT(1)?" 

GETX$:IFX$=""THEN450 

IFX$ = "I"THENPRI NT, "□ ":G0T0272 

END 



O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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Tisztelt Commodore Újság! 


Számítógépem: Commodore Plus/4. 
Életkorom: öregségi nyugdíjas. Ebből 
adódóan: érdeklődési köröm nem a játé¬ 
kok felé húz. Igyekeztem — autodidakta 
módon — elsajátítani a programkészítés 
fogásait, főleg BASIC-ben. Kicsit bele¬ 
kóstoltam a gép MONITOR, illetve ké¬ 
sőbb ASSEMBLER +/4 lehetőségeibe is. 
Sajnos itt még nem nagyon rúghatok 
labdába. 

Néhány éve felmerült az a lehetőség 
— és szükséglet —, hogy feleségem mun¬ 
kahelyéről kölcsönbe kapjak egy MPS 
nyomtatót és egy 1541-es lemezegységet. 
Ezek segítségével — és a Plus/4 beépített 
programjaival — elég sok levelezési és 
adattárolási feladatot sikerült megolda¬ 
nom. Ehhez azonban szükségem volt egy 
olyan programra, ami ékezetes betűket 
tud előállítani nyomtatón, mert a géphez 
adott kazettán csak képernyős lehetőség 
volt. 

Itt adta a segítséget a C-Újságban 
1989/3., Várkonyi István neve alatt közölt 
,,3-PLUSZ-l magyarul” program, mely 
kitűnően oldotta meg nyomtatási problé¬ 
máimat. További — igen nagy — segítsé¬ 
get jelentett munkámban az, hogy amikor 
az önök Pötyögő Szolgálat-ától megvet¬ 
tem a programot, megkaptam a DELTEX 
+4-es változatát, amit akkor nem is tud¬ 
tam igazán értékelni, csak később amikor 
rájöttem, hogy milyen értékes szövegszer¬ 
kesztési lehetőséghez jutottam. Utólag is 
hálás köszönetem az akkori „pötyögő- 
nek” (kb. ’91 nyara volt). 

Jó egy éve, alapos megfontolás (ár és 
teljesítmény) után vettem egy használt 
SP-180VC nyomtatót, és fiamtól kaptam 
egy — javítás után — használható lemez¬ 
egységet. így már nem szorultam köl¬ 
csönre, ha dolgozni akartam. 

Olvastam az önök lapjában a Novot¬ 
rade hirdetésében, hogy kapható náluk 
magyar EPROM a nyomtatóhoz. Sajnos 
az ára — nekem — túl magas volt. így 
megpróbáltam ismét önöknél érdeklődni. 
Kiderült, hogy ez az EPROM is szerepel 
a kínálatukban, így már számomra is 
megfizethető volt. A nyomtató már készen 
állt a jó minőségű munkára, azonban me¬ 
gint gondom támadt a vezérlő program¬ 
mal, mert az eredeti ékezetes megoldás 
grafikára kapcsolt, így viszont felemás 
nyomtatási kép keletkezett, hiszen sem¬ 
miféle kiemelési funkció (kövér, elit, dup¬ 
la, NLQ) nem vonatkozott az ékezetes 
betűkre. 

Kénytelen voltam megpróbálkozni az 
eredeti (3-PLUSZ-l magyarul) program 
olyan átírásával, ami igazodik az átalakí- 
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PROGRAM 


C* 

tott SP-180-hoz. Ez némi kínlódás után si¬ 
került úgy, hogy az új jeleket nem grafiku¬ 
san, hanem — kódváltás után — az új 
EPROM-ból állítja elő, így minden nyom¬ 
tatási funkció vonatkozik az ékezetes (és 
néhány különleges) karakterre is (pl.: Ft, 
§, C= °). 

Ezúton kérek elnézést a szerzőtől, 
hogy munkájához hozzányúltam, de mu¬ 
száj volt. Itt jegyzek meg valamit. Az ere¬ 
deti programban egyetlen helyen van egy 
— lényegtelen — hiba. A $11FD címen 
lévő byte $88 helyett csak $80, így az 
egyik keretrajzoló karakter egy képpontja 
hiányzik. Ez az újságban és a vett progra¬ 
mon is így volt. 

Itt kell megjegyeznem, hogy az éke¬ 
zetes program futása a beépített progra¬ 
moknál bizonyos korlátokat szab. így pél¬ 
dául az adatbázis-kezelőnél az utolsó 
mező nem fogad el ékezetes betűket 
nyomtatásra. Kiküszöbölés: az utolsó me¬ 
zőbe csak átalakítatlan karakter. Azonkí¬ 
vül, a rekord újraírásánál minden mezőn 
végig kell menni RETURN-nel, mert kü¬ 
lönben elvesznek az ékezetes betűk. 

Probléma adódik a számviteli tömb¬ 
nél is. Itt egyes számítási képletek, ékeze¬ 
tes módban nem működnek. Megoldás: a 
fejlécek és szövegek megírása után, tárol¬ 
ni. Rését vagy kikapcsolás után, az eredeti 
(FI) indítás, és így már minden jól műkö¬ 
dik. A kitöltés és számítások elvégzése 
után újra tárolni, majd a nyomtatáshoz is¬ 
mét az ékezetes program. Ezek a hibák az 


Boríték 

A „Boríték készítő” alapötletét egy 
régebbi C-Újságban megjelent Dr. Hack 
Frigyes által írt „Boríték címező” prog¬ 
ram adta. 

A SEIKOSHA SP-180VC nyomtató 
nem tud a papír legfelső részére írni, és 
a papírtovábbítás is elég gyatra. Ha boríté¬ 
kot fűzök be, az elcsúszik, nehéz beállíta¬ 
ni. A megoldás a perforált széllel ellátott 
boríték lenne... 

’ gy a boríték készítő program! 

Egy normál írógéplapra rányomtat¬ 
juk a megcímzett borítékot kiterítve. Ezt 
ollóval kivágva majd hajtogatva és ra¬ 
gasztva, meg is van a boríték. A hajtási 
vonalaknál lefelé kell hajtani, kivéve a 
legalsó hajtást, amit felfelé. A feladó irá¬ 
nyítószámával egyvonalban levő két kis 
egyenes azt mutatja, hogy csak alatta kell 
ragasztani. A kész „mű” formája olyan, 
mint az öntapadós borítéké, de természe- 
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én módosításom után is benne maradtak, 
hiszen a program többi funkciójához nem 
nyúltam hozzá (kellő ismeret hiányában). 

Mellékelten küldöm a program átala¬ 
kított részének listáját, hiszen az egészet 
felesleges lenne. Az megtalálható a Com¬ 
modore Újság 1989/3. 7—11. oldalán. 


azonkívül a Pötyögő Szolgálat 139. szá¬ 
mán. Szintén megküldöm az átalakított 
program — általam „K139 +4/SP 180” 
nak nevezett változatát lemezen. Betöltés: 
DLOAD ,,K139 -I-4/SP 180”. 
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a0$ =es$+"-0“ 
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r$ =chr$(18) 
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fm$(5)=v$ 
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rém ******************************* 

o 


400 

color0,7,6:colorl,I:scnclr 
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dimc$(28,5) 
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reada$:i1$=str$(i) 
ifa$="kulcs"thena$="... 
il$=right$(i1$,len(i1$) 
ifi<10thenil$=*0" + i 1$ 

a$=left$( (a$+".“). 

c$(i,0)=a$:printa$ 

fórj=lto5:readc$(i,j):next 

next 

c$(28,0)="***** vége *****" 
m=l 

scnclr 

print" ®,- 

rém Cspc] Cctr/91 Cc=/7] Cc=/font] 

print" gii- 

rém Cspc] 
print" 311 
rém Cspc] 
print" 31 
rém Cspc] 
print" 33 L 
rém Cspc] 
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36xCc=/+] 


tescn nem öntapadós. A ragasztáshoz én 
PRITT STIFT ragasztót használok. A bo¬ 
ríték lezárásához szintén ragasztó szük¬ 
séges. 

A program működése: 

A SEIKOSHA SP-180VC nyomtató 
sajnos NLQ minőségben csak a beépített 
karakterkészlettel tud írni. A program 
használata előtt a nyomtatót át kell kap¬ 
csolni DIN karakterekre. Ez a gép hátul¬ 
ján levő DIL-kapcsolósor balról és 4. tag¬ 
jának íéltéle állításával történik. Ezután 
be kell tölteni és lefuttatni a ,,DIN- 
karakter” programot, hogy a képernyőn is 
az látszódjon, ami nyomtatva lesz. 

DATA sorok tartalmazzák a 27 tagú 
címtárat. A képernyőre kiírt kulcsszavak 
alapján kereshetjük ki a kívánt címzést. 
Az inverz sort a cursorvezérlő gombokkal 
lehet mozgatni, majd a RETURN lenyo¬ 
mása után kiírja a kulcsszóhoz tartozó 
címzést. ,,N” megnyomása után visszatér 
a menüre. ,,I” után indul a nyomtatás. 

A program beírása: 

Elször be kell tölteni és futtatni a 
,,DIN-karaktcr” programot. Ezután kez¬ 
dődhet a beírás. Az 5-re végződő sorszá¬ 
mú sorokat nem kell beírni, ezek csak az 
előző sorok beírását könnyítik meg. A 
többi REM-ek után található megjegyzé¬ 
seket sem feltétlen szükséges beírni az 
1800-as sorig. Ezek csak a program meg¬ 
értését segítik. 

A 280-tól 310-ig terjedő számú so¬ 
rokba a saját nevet, címet, irányítószámot 
kell az idézőjelek közé beírni. Az 1860-tól 
2540-ig sorszámú sorok a listán nem talál¬ 
hatók. Az 1820, 1830 és 1840 sorok ismét- 
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I 12" 


Cctr/0] 
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1 boríték készítő program 
Cctr/9] 2xCc=/k] 5xCspc] 6xCspc] 2xCc=/k] 

1 -' 12 " 
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Cctr/9] Cc=/i] 36xCc=/+] 
print rprint:print:fori = ltol4 
print" "c$(i,0)“ "c$(i+14,0) 

next:print 

print"kiválasztás:a cursor és return gombokká]"; 

goto750 

getkeya$ 

i fa$=“ $"ora$="3” ora$="ffl" ora$=" W ora$=chr$(13) then670 
rém Cfel] Cle] Cbal] Cjobb] 
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'c$(m,i):next 


ifa$="n"then530 
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53 


Papírt befűzni!" 

3C ] 

Nyomtatot bekapcsolni!“ 
3C 3 

[RETURN]-t lenyomni!" 


syjyomtatokjil 


rint" kb. 4 percig tart. 

1005 rém 3xCspcl 4xCspc] 

1010 rém******************************** 
1020 openl0,4,10:print#10:rem alapall. 
1030 open4,4,7:print#4,nl$“1“;:rem 
1040 print#4,ep$;chr$(0)chr$(89);vl$ 

1050 rém******************************* 
1060 fori=ltol3 


nlq on 


lödnek, azzal az eltéréssel, hogy a RÉM 
után levő szám mutatja, hányadik tagja az 
„adatbázisának. Minden tag 6 adatból 
áll. Az adatokat idézőjelek közé kell írni 
és vesszővel kell elválasztani. A kulcs 
megjelenik a menüben. A megsz. (meg¬ 
szólítás) például „Dr.”, de lehet egy 
„SPACE” is. A név helyére nevet, a város 
helyére a várost kell beírni. A cím az ut¬ 
ca, házszám, emelet, ajtószám lehet. Az 
ir.sz. az irányítószám. 

A 01 és 02 címzés (1760—1810 sor) 
példaként szerepel, tetszőlegesen át lehet 
írni, ahogy a többit is 27-ig. A 03, 
(1820-1840) 26 32510—2530) és 27 
(2540—2560) üres címzést jelent, amit 
nem nyomtat ki és a menüben is csak a 
sorszám látszik. 

A címekkel teljesen, vagy részlege¬ 
sen féltöltött programot célszerű ki¬ 
menteni. 


Percze István 


O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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PROGRAM 


Cr 


o 

1070 

i1=15—i: i2=i+63 

O 

o 

1080 

tl$=str$(i1):tl$=right$(tl$, len(tlS)-l) 

O 


1090 

ifil<10thentl$="0"+tl$ 

o 

1100 

t2$=right$(str$(i2), 2) 

o 


1110 

print#4,tb$;t1$;"/"; 

o 

1120 

ifi = 13thenprint#4, “ 

o 


1130 

ifi>7thenprint#4, ep$;chr$(0)chr$(44);" 1"; 

o 

1140 

ifi<7thenl240 

o 


1150 

print#4,tb$;"12" ; 

o 

1160 

ifi=9thenprint#4, fa$(1);:rem fa 

o 

1170 

ifi=10thenprint#4, fa$(2);:remfa név 

o 

1180 

ifi = llthenprint#4, fa$(3);:remfa var 



1190 

ifi=12thenprint#4, fa$(4);:remfa cim 

o 


1200 

ifi=13thenprint#4,fa$(5);:rémfa isz 

o 


1210 

ifi>7thenprint#4, ep$;chr$(1)chr$(166);“ 1" ; 


1215 

rém [c=/k] 


o 

1220 

ifi=7thenprint#4, ep$;chr$(0)chr$(47);v2$; 

o 

o 

1230 

ifi-13thenprint#4,“ " ; 

o 

1240 

print#4,tb$;t2$;"; 

0 

1245 

rém [fonti 


1250 

print#4:nexti 

o 


1260 

rém* ************* ********* ******** 


o 

1270 

j=0:fori=ltol6 

o 


1280 

print#4, ep$;chr$(0)chr$(08);” 1“ ;ep$;chr$(0)chr$(44);" I" ; 


o 

1285 

rém Cc=/k] 

o 


1290 

print#4,tb$ ;" 12" ; 


o 

1300 

ifi<>6andi<>7andi<>10andi <> 12andi <> 14thenl360 

o 


1310 

j=j + l 


o 

1320 

iflen(c$(m,j ))> 18thenl340 

o 


1330 

ifj=2orj=3thenprint#4, d$; 


o 

1340 

print#4,tb$"32“;f$;fm$(j);c$(m,j);chr$(141); 

o 


1350 

print#10 


o 

1360 

print#4,ep$;chr$(1)chr$(166) ;" 1";ep$;chr$(1)chr$(202) ;" 1" 

0 


1365 

rém Cc=/k] 

o 

1370 

nexti 

o 


1380 

rém* ****************************** 

o 

1390 

fori=lto7 

0 ■ 


1400 

il=i+l : i2=77-i 

o 

1410 

tl$=str$<i1 ) :tl$=right$(tl$,len(tlS)-l ) 

o 

1420 

ifil<10thentl$="0"+tl$ 

o 

1430 

t2$=right$(str$(i2), 2) 

0 

1440 

print#4,tb$ ; tl$ ;“; 

o 

1445 

rém [font] 



1450 

ifi<7thenprint#4,ep$;chr$(0)chr$(44) ;" 1";ep$;chr$( 1 )chr$( 166) 

o 


1455 

rém [c=/k] 


vJ 

1460 

print#4,tb$ ; t2$ ;“; 

0 

o 

1470 

ifi<6thenl490 


1480 

ifi=6thenprint#4, tb$ ; "08";v2$; 

G 

o 

1490 

print#4:nexti 


1500 

rém******************************* 

o 

o 

1510 

fori=lto25 


1520 

print#4,ep$;chr$(0)chr$(50); " 1";ep$;chr$(1)chr$( 160); “ 1" ; 

o 


1525 

rém [c=/k] 


o 

1530 

ifi=21thenprint#4,ep$;chr$(0)chrS(53) ; 

0 

o 

1540 

ifi=21thenprint#4,left$(v2$,len(v2$)-2) ; 


1550 

printtt4:nexti 

o 


1560 

print#4,tb$ ;" 09\ •; tb$ ;" 69/ "; cr$ ; 
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PROGRAM 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1565 rém [font] 

1570 print#4,ep$;chr$(0)chr$(59); 

1580 print#4,left$(v2$,len(v2$>-4) 

1590 rém******************************* 

1600 print#4,chr$(12) 

1610 print#4,nl$"0‘:rem nlq off 

1620 close4:closel0 

1630 print"®MÍ 

1635 rém 4x[le] 26xCspc] 

1640 print" .slmfilégegyszer " 

1645 rém 7xCspc] [ctr/<] Cctr/>] 9x[spc] 

1650 print" :Ju.Elj boriték " 

1655 rém 7xCspc] Cctr/<] Cctr/>] 9xCspcl 
1660 print" ülvjijége " 

1665 rém 7x[spc] Cctr/<] Cctr/>1] 15x[spc] 

1670 print" 

1675 rém 28xCspc] 

1680 poke239,0 

1690 getkeya$:ifa$<>"m"anda$<>"u"anda$<>"v"then1700 
1700 ifa$="m"thenprint“ MMIflMM ":goto910 
1705 rém 5xCle] 

1710 ifa$="u"thenrun 

1720 print"S«!»R«Íl!l!ljbiztos befejezted ? i/n" 

1725'rém tclear] 4xCle] 4xCjobb3 
1730 poke239,0 

1740 getkeyaí:ifa$="n"then530 
1750 ifa$<>"i"then1750 

1760 rém 01 **************************** 

1770 data"O.C.E.“,"O.C.E.","Dr. Horváth András"Budapest" 
1780 data"Vöröstorony u. 29.","1025“ 

1790 rém 02 **************************** 

1800 data"2siga"," "."Wágner Zsigmond","Budapest" 

1810 data“Kövidinka utca 179. XXI. em. 214.“,”1234" 

1820 rém 03 **************************** 

1830 data"kulcs","megsz","név","varos" 

1840 data"cim","ir.sz." 

1850 rém 04 **************************** 

1860 . 

2500 . 

2510 rém 26 **************************** 

2520 data"kulcs","megsz",“név","varos" 

2530 data"cim",“ir.sz." 

2540 rém 27 **************************** 

2550 data"kulcs","megsz","név",“varos" 

2560 data"ciin", " ir. sz. “ 


O 

O 

O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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Még többet ésszel! 


XI. rész 

A játékpályázatra elküldött programok többségükben igen 
szegényesen voltak dokumentálva. Egy bármilyen nagyszabású 
munka sikere is múlhat azon, hogy megfelelő leírás birtokában 
jól használható-e vagy éppen továbbfejleszthető-e a program. 
Sőt, a nagyobb, összetettebb programok sokkal inkább igény¬ 
lik a figyelmes dokumentálást. A figyelmes jó szó, mert egy 
idegeneknek átnyújtott programot illik érthetően tálalni. Beszél¬ 
jünk tehát a dokumentálás kívánalmairól. A most következők 
nyilván az én saját elképzeléseimet tükrözik, amelyek a pár éve 
még biztosan érvényes hagyományra alapulnak, és amelyet a ta¬ 
pasztalataim, az ízlésem és korábbi tanáraim ízlése alakítga¬ 
tott. 

A dokumentáció alapvetően két részre bontható: felhaszná¬ 
lói és fejlesztői leírásra. A két rész aránya és terjedelme a szerzők 
(vagy a kiadó) megítélésén múlik, de valójában mindig a vevő 
(olvasó, tanár stb.) igényeihez kell igazodni. Nyilván egészen 
más jellegű dokumentációt kíván egy szövegszerkesztő program 
az üzletekben és egy BASIC-bővítés a Commodore Újságban. 
Ez utóbbit eleve szakértő közönség fogadja, akiknek már nem 
kell a gép használatát magyarázgatni, ráadásul az újság terjedel¬ 
me nagyon korlátozott. 

A felhasználói leírás mindazokat a tudnivalókat tartalmaz¬ 
za, amelyek a program használatakor hasznosak lehetnek. Ezek 
közül a legelsők a program megnevezése, feladatának tömör 
összefoglalása és esetleg a bemutatott programot a többi hason¬ 
lótól (nemcsak előnyösen) megkülönböztető legfőbb vonások 
felsorolása. Ezekre azért van nagy szükség, hogy a programról 
annak kipróbálása előtt is kiderüljön, mit tud, mire való. Vissza¬ 
tetsző dolog a szemérmetlen önreklámozás, még mindig taná¬ 
csosabb a hűvösen álszerény hangnem, vagy a tiszta tárgyilagos¬ 
ság. Különösen, ha nem vagyunk meggyőződve a program világ- 
megváltó voltáról. 

Idejében közölni kell a futtatáshoz szükséges feltételeket, 
úgymint használható géptípus, perifériák, tárigény, a kezelés 
módja, a másolásvédelem vagy más korlátozó körülmények. Fe¬ 
lesleges egy részletező technikai hadova a processzor típusáról 
vagy a Kernal-vektorok értékeiről, mivel a Felhasználó ezekhez 
többnyire nem is ért. Ha nincs különösebb előírás, akkor elég 
a „szabvány alapgép” megjelölése is. 

Itt következhet, ha kell, a program céljának, feladatainak 
részletes bemutatása, kifejtve a bevezetőben felsoroltakat. A já¬ 
ték szabályait is el kell mondani egyszer, méghozzá jól érthetően 
vagy akár színesen. Azonban szem előtt kell tartani, hogy a prog¬ 
ram a fő mutatvány, és nem a leírás. A program sápadtságát nem 
lehet egy csillogó leírással kendőzni. Elrettentő példaként említ¬ 
hetnék most cgy-két profi harci játékot. Ezekhez vaskos leírást 
mellékeltek, amelyben például a repülőszárny-profilok áramlási 
jellemzőitől kezdve a különféle szovjet harci rakéták műszaki 
adatáig mindenféle érdekes, de haszontalan adatot ömlesztenek 
a vásárló nyakába. Eközben pedig a program lehet egy ismert 
játék akárhányadik érdektelen félmelegítése. 

Ha a feladat tisztázott, akkor következzen a kezelési leírás. 
Mérlegelni kell, hogy a leírás olvasójától milyen mértékű hozzá¬ 
értést lehet elvárni a gép kezelésével és hasonlókkal kapcsolat¬ 
ban. Ha a hozzáértést minimálisra tippeljük, akkor mindenkép¬ 


pen le kell írni a program betöltésének, elindításának módját. 
Ha terjedelmesebb leírást készítünk, akkor helyet lehet szánni 
a lépésenkénti kalauzolásra is a betöltés során, különös tekintet¬ 
tel a gép üzeneteinek magyarázására. De a tapasztaltabb vevők¬ 
nek előírható egyszerűen az ,,XY” nevű program betöltése és 
indítása. Laikus felhasználókra számítva különösen tanácsos a 
tudálékos szakszavak helyett érthető, természetes (és lehetőleg 
magyar) kifejezések használata, ezzel a tapasztalatlan vevőben 
elaltatható az idegen eszközöktől való félelem. Persze a könnyed 
hangnemmel is csínján kell bánni, mert a viccelődő leírás majd¬ 
nem olyan idegesítő lehet, mint egy humorizálgató program. 
Szóval, az ember itt van leginkább az ösztöneire és az ízlésére 
utalva. 

Egy nagyobb program kezelésének összes fortélyát igen ne¬ 
héz áttekinthetően bemutatni. Ha világos, rendszeres szerkesz¬ 
tésre törekszünk, amiből semmit nem felejtünk ki, már nem dol¬ 
gozunk hiába. Mindenképpen érdemes az elején tisztázni né¬ 
hány alapfogalmat, mint például az adatbevitelkor használandó 
vezérlőbillentyűk szerepe. A kezelés módját jó az indításkor 
megjelenő kezdőállapottól kezdve tárgyalni, és a különböző me¬ 
nüpontok vagy alprogramok szerint csoportosítani. A csavaro¬ 
sabb ötleteket vagy példákat, javaslatokat a fejezetek végén cél¬ 
szerű összeszedni. Es még egy fontos jótanács: egy hosszú leírás 
nem mindig üthető tél gyorsan, kézikönyvként. Ilyenkor ké¬ 
szítsünk egy nagyon rövid, kivonatos emlékeztetőt a kezelésről, 
ez lehet a leírás legfontosabb része. 

Túl vagyunk a nehezén, a továbbiakban már csak hozzá¬ 
értőnek kell magyaráznunk, a fejlesztői leírásban. A nevének 
megfelelően ez elsősorban arra szolgál, hogy ha valaki javítani 
akarja a programot, akkor ismerősként tájékozódhasson benne. 
Természetes dolog, hogy egy üzletben kínált programhoz ezt 
nem mellékelik, mivel a szerző meg óhajtja tartani a fejlesztés 
jogát. Ugyanakkor a programozó kollégák számára közzétett 
programhoz részletes leírást illik csatolni, hiszen szándékunk 
szerint éppen bemutatni kívánunk valami általunk kidolgozott 
eszközt. 

Először is, ha ez szükséges, a szaknyelv előnyeit kihasználva 
pontosítható a feladat, a feltételek és a használható eszközök. 
Aztán nagy vonalakban felvázolható a program szerkezete, a 
fontosabb egységek, szubrutinok megemlítésével. Ez az egész 
csak pár mondatot foglal el, de sokat számíthat. 

Nyomban ezután lehet szólni a programban felhasznált 
egyéni alapötletről vagy más nem magától értetődő alapelvről. 
A játékpályázatban ilyen volt a gép által alkalmazott stratégia, 
illetve a játékalgoritmus elvi ismertetése (a dokumentációknak 
ez volt a leggyengébb pontja). Ez azt jelenti, hogy a gépet hogyan 
bírtuk rá a gondolkodásra, a helyzet elemzésére és a döntésre. 
Kezdve ott, hogy például a játéktáblát hogyan ábrázolja a gép 
a maga számára (nem a grafikus megjelenítésre gondolok), az 
üres és foglalt mezők, a megtehető lépések megjelölésének mód¬ 
jával . Elmehetünk odáig, hogy mi alapján ítéltettünk egy helyze¬ 
tet előnyösebbnek a többinél, vagy hogyan tereltük a gép lépéseit 
egy határozott támadó (vagy védekező) irányba. 

Egy ilyen bonyolult döntéshozó program első kiépítésben, 
ha az előzőleg kifejtett algoritmust egyszerűen megvalósítjuk, 
várhatóan elég lassú lesz. Gondolni kell tehát az optimalizálásra 
is, igazodva a gép (a nyelv) adottságaihoz, ennek révén gyorsab¬ 
bá vagy éppen hatékonyabbá tehető a program. El kell azonban 
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mondani az optimalizálás módszereit is, mert ezzel eltorzult az 
eredeti elv. 

Az ilyen elvi indoklástól nem szabad sem fáradságot, sem 
helyet sajnálni. Egy ilyen feladatban, mint ez a pályázat volt, a 
stratégia és annak megvalósítása a legérdekesebb dolog. A gép 
csak azt csinálja, amit mi diktálunk neki, ezért a gép lépéseiben 
a szerző gondolkodását láthatjuk tükröződni. 

Hasonlóan lényeges feladat a gyakorlati megvalósítás rész¬ 
letes áttekintése. Itt már szót kell ejteni mindenről, a globális vál¬ 
tozókról, a modulok és szubrutinok céljáról, azok paraméterei¬ 
ről, és így tovább. Nem feltétlenül jelent ám ez egy sokoldalas 
fogalmazást. A fejlesztői dokumentáció leglényegesebb része 
maga a forrásprogram, ezért természetesen ezt is át kell adnunk 
a futtatható (lefordított, tömörített, egyéb módon kódolt) válto¬ 
zattal, lehetőleg jól olvasható, szellős alakban. Alapkövetelmény 
a fő elemek (szubrutinok) elkülönítése és azok adatainak megje¬ 
lenítése megjegyzések (komment) formájában. Ha ezt gondosan 
végezzük, máris megtakarítottuk a leírás jelentős részét, mert 
csak azt kell külön is megemlíteni, ami nem látszik magától a 
program olvasásakor. Kifejezetten érvényes ez a program mene¬ 
tének folyamatábrával, struktogrammal, pszeudokóddal történő 
ábrázolására. Bár az öreg programozók sokszor ragaszkodnak 
hozzá, szerintem általában felesleges ezek közlése. Meggyőző¬ 
désem, hogy ha egy program szerkezete olyan zavaros, hogy sza¬ 
vakban már nem lehet télvázolni, akkor úgysem segít rajta sem¬ 
milyen ábra. 

Megkönnyíthető a program elemzése ,,beszélő” változóne¬ 
vek alkalmazásával is. Arra gondolok, hogy a fontosabb változók 
rövidítve, emlékeztetőként utaljanak a bennük tárolt adatok sze¬ 
repére. 

Nem szabad azt hinni, hogy a leírásban a változók puszta 
felsorolása elegendő. Ha az adatoknak valami jelentése van a 
program számára, tehát nemcsak valami számolás eredménye 
vagy egy kapcsoló, akkor a kódot is ki kell fejteni. Például ha 
az UT=—1 azt jelenti, hogy a gép figurája ütésben áll, akkor 
ezt is fel kell tüntetni az UT nevű változó leírásában. 

Nyilvánvaló, hogy csak felesleges fáradság lenne szerző¬ 
nek, olvasónak az összes változó összes előfordulását dokumen¬ 
tálni . Az, ha egy V változóba bemásolok egy értéket, hogy aztán 
két sorral odébb felhasználjam, majd el is felejtsem, nem érde¬ 
mel külön említést, csak zavaróan hatna az erről szóló feljegy¬ 
zés. Valójában az, ha egy ilyen változó vagy értékadás nem szere¬ 


pel a leírásban, jelzi azt, hogy csak egy lokális érvényű, átmeneti 
jelentőségű változóról van szó. Ennek tudatában a program olva¬ 
sója nem is keresi az adat távolabbi felhasználását vagy éppen 
eredetét. 

Lemezes file-okat használó programokhoz feltétlenül meg 
kell adni az összes lile rekordleírását. Ebben szerepeljen az 
összes mező hossza, helyzete a rekordon belül, a benne tárolt 
adat típusa, jelentése. 

Mondanom sem kell, hogy ha egy BASIC program gépi 
kódú szubrutinokat is meghív, akkor annak címét, feladatát, sa¬ 
ját rutin esetén a dokumentációját is meg kell adni. Egy apró 
assembly szubrutin esetében ez úgysem jelent semmi különös 
munkát. 

Az igazán profi, nagyszabású programokhoz szokás leg¬ 
alább pár sorban támpontokat adni a továbbfejlesztéshez vagy a 
más géptípusra való átíráshoz is. Ilyen udvarias gesztus a nagyon 
gépfüggő elemek (pl. POKE címek) magyarázata. Meg lehet 
említeni néhány olyan ötletünket is, amelyek kivitelezésére vala¬ 
miért nem került sor. Vagy éppen hogy mit lehetne még jobban 
megcsinálni. 

Nem nagy dicsőség nem hibátlan (vagy gondtalanul tesztelt) 
programot kiadni a kezünkből. Mégis, az általunk ismert hibákat 
legalább a leírás végén fel kell sorolni, bár megválaszolatlanul 
marad a kérdés, hogy akkor miért nem javítjuk ki őket saját 
magunk. 

Azt hiszem, sikerült összeszednem a dokumentáció elkészí¬ 
téséhez legszükségesebb ötleteket, tapasztalatokat. Saját ma¬ 
gamról tudom, hogy ez a program írásának talán legkevésbé von¬ 
zó része. Sajnos mások nemcsak a dokumentálás gondossága 
alapján (is) értékelik munkánkat, hanem érthetően el is várják 
tőlünk ezt a többletmunkát. Talán erőt adhat a nehéz percekben 
az a tudat, hogy ha a saját programunk továbbfejlesztésére szán¬ 
juk el magunkat, akkor nagyon finom dolog egy profi leírásból 
egyszerre magunkba szívni minden korábbi elképzelésünket, 
emlékünket. 

És most még egy apróság. Úgy hiszem, a sorozat olvasóinak 
tartozom azzal, hogy kiigazítom a Vili. részben talált sajtóhibát. 
A 2. hasáb 3. bekezdésében eredetileg a következő állt: ,,A C64 
interpreterében a $A38A címen kezdődik az a szubrutin, amely 
a $49/4A címen átadott változónévvcl megnyitott ciklus adatait 
keresi a veremben.” 

Hódi Gyula 


BASIC kezdőcím eltolása 

A POKE 44,16 a BASIC memóriaterület kezdőcímét 
4096-ra állítja. De VIGYÁZAT! Az interpreter a program első 
memóriahelyén nulla-bájtot vár. Ha nem ezt talál, a sorokat eset¬ 
leg nem helyesen olvassa, és szintaktikus hiba léphet fel, ami 
a képernyőn kiíródik. Ha az átállítás után beadjuk a 
F KE 4096,0 

utasítást, minden rendben lesz. 


Szoftver-rését a C128-on 

A rését 128 módban is elérhető 
SYS 65341 
hívással. 


Kurzorvezérlés 
— könnyedén 

Egy operációs rendszerbeli rutin segítségével a kurzor a 
képernyő tetszőleges helyére pozícionálható, vezérelhető. 

POKE 214, (sor száma): POKE 211, (oszlop száma): 
SYS 58640:PRINT „Felírandó szöveg”. 


Kurzor gyorsítása 

POKE 56325,5 beadása után a kurzor mozgatása nagyon 
gyorssá válik, szinte rohan a kurzorbillentyűk működtetésekor 
keresztül-kasul a képernyőn. Aki valamelyest lassabban szeretné 
ezt tenni, próbálkozzon a POKE 56325,255-tel. 
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JACKIE 


SZOFTVER 

UTILITITES C-64 


III. rész 

Egyszerűen és gyorsan módosíthatjuk a karakterek formáját 
a „CHAR-HELP” rutinnal (8. lista). A betöltő futtatása után: 
SYS 49152, kezdőcím, tömb $ (n). A kezdőcím a memóriának 
az a címe, ahonnan a karakter adatait el kell helyezni. Célszerű 
a 12288-tól kezdődő területet használni. Innen aztán képernyő¬ 
kód (nem ASCII!) sorrendben követik egymást az egyes adatok. 
A megadott füzér típusú tömb megadott elemétől kezdődő, 
összesen 8 db elem tartalmazza a jelalakot. Minden elemnek 
kötelezően 8 karakter hosszúnak kell lennie és csillagot, ill. szó¬ 
közt tartalmazhat. 


100 RÉM" r-i" 

O U® RÉM" I KARAKTER NAGYÍTÓ I" 

120 RÉM" I COMMODORE 64 I" 

130 RÉM" t-)" 

O 14® REI'1" I IRTA ! JACKIE MAESTRO I" 

150 RÉM" ■- 

160 ■ 

O 170 K=49152 >7=49347 

180 OEFFNACX>=ASC<M104 < A*,X,1)>-48+7* 
q <MIO*<A*,X,1>>"0“> 

19® FÓR I=K TO V STEP 8>8=0 
2O0 • 1 FÓR J=0 TO 7 
Q 210 >■iREAD AT 

22® i">A=16*FNA<1>+FNA<2> 

230 ■ > ' POKE I + J - A ‘ PR I NT " Cl" J I+J 
O 240 i > > S=S+A 
250 ■ •NEXT 
260 >" REAÖ AT 

O 270 ■>0=16*FN0<1>+FN0<2) 

280 IF<SAN0255> =OTHENNEXT > PRIHT"OI<" > END 
290 PRINT"HIBA-";PEEK<63>+256*PEEK<64> 
° 300 DATA 20,FD ,AE ,38,20,F® ,FF, 86, 98 
301 DATA F9,84,FA,2®,9E,B7,8E,FF,79 
q 302 DATA ®3,R8,E0,21,90,03,4C,48,D3 
U 3®3 DATA B2,20,FD,AE,20,9E,B7,E0,D2 
304 DATA 12,B0,F3,18,2©,FO,FF,18,F4 
Q 305 DATA A5,01,6D,FF,03,85,FB,85,EA 

306 DATA Fü,A5,02,69,0®,85,FC»18,76 

307 DATA 69,04-, 85, FE, 20, FD, AE, 2®, AB 
O 308 DATA 9E,B7,86,fF,20,FD,AE,20,C5 

309 DATA ©A,AD,20,F7, B7 ,A5,14,85,43 

310 DATA F7,A5,15,85,F8,2©,FD,AE,F9 
O 311 DATA 20,9E,87,86,SC,20,FD,AE,52 

312 DATA 20,9E,B7,86,80,78,A9,01,AA 

313 DATA 83,01,A®,0®,84,8F,B1,F7,E1 
o 314 DATA 85,02,A2,00,46,02,A5,8C,A2 

313 DATA 90,02,A5,80,86,8E,A4,SE,©A 
- 316 DATA 91,FB,A9,©7,85,01,A5,FF,66 

° 317 DATA 91,FD,A9,01,85,01,E8,E0,8S 
318 DATA 08,D0,E1,18,A5,FB,69,23,02 
0 31.9 DATA 85, FB, A5, FC, 69, ®0, 35, FC, ÖB 
" 320 DATA 18,A5,FD,69,28,85,FD,05/72 

321 DATA FE,69,0O,85,FE,E6,3F,A4,03 
o 322 DATA 8F,C0,08, DG, B9, A9,07,85, 15 

323 DATA 81,58,18,A6,F9,A4,FA,28,CE 

324 DATA F®,FF,60,00,00,00,00,00,4F 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 



Szükségünk van kinagyított karakterekre? Kérem, semmi 
probléma! A 9. lista ,,KARAKTER NAGYÍTÓ”ja megoldja! 
Indítás: SYS 49152, x, y, szín, kezdőcím, ki ASCII, be ASCII, x 
értéke 0—32, y-é 0—17 lehet. Ha a beépített jelkészletet kívánjuk 
a képernyőre csalni, a kezdőcímet 53248-t kk — 8-nak vegyük, 
ahol ,,kk” a képernyődód. Továbbá meg kell adnunk, hogy mi¬ 
lyen ASCII kódnak megfelelő karakter idézze a ki- és bekapcsolt 
pontokat. 

Gyakran van szükség (pl.: játékok készítésekor) joy-jal való 
karaktermozgatásra. Nos, a 10. listán látható „KARAKTER- 
MOZGATÁS JOY-jal” nevű rutin ezt a feladatot látja el, méghoz¬ 
zá a megszakításon keresztül. Az alábbi módon indítható: SYS 
49152, x, y, szín, képernyőkód jobbszél, belső, fölső szél, alsó 
szél, lassítás. Meg kell adni a kiinduló pozíciót (x: 0—39; y: 
0—24), a karakter képernyőkódját, színét, valamint annak a te¬ 
rületnek a határait, amelyen belül engedélyezett a mozgatása. A 
kikapcsolás a lassítás nullára állításával lehetséges. A joy számát 
1, ill. 2-nek lehet választani. Vigyázzunk az értékek pontos meg¬ 
oldására, főleg a mozgatási határokat illetően. Hibás paramé¬ 
teriek) esetén a rutin számunkra kellemetlen memóriaterületre 
is ír(hat)! 


O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


100 RÉM" .-, 

110 RÉM"ICHARACTER - HELP V1.01 

120 RÉM" I COMMODORE 64 I 

130 RÉM" I- : -4 

140 RÉM" I IRTA" JACKIE MAESTRO I 

150 RÉM" ■- 1 

168 « 

í 78 K=49152 ■V=49270 

180 OEFFNA<X>=ASCO-IID*OT*,X,l>>-48+7* 
(. M10* < A-T, X, 1 > > " Cs " > 

190 FÓR I=K TO V STEP 8 - 3=0 
200 > "FÓR .1=8 TO 7 
21® > ■ READ A* 

220 ">"R=16*FNA<1>+FNA<2> 

230 " • "POKE I+J, A > PR INT "51" i 1+J 


240 

250 


<"S=S+A 
" NEXT 
260 ""READ A* 

270 " •A-16*FNR<1>+FNA <2 > 

280 IF<SAND255>«RTHENNEXT"PRINT"0K""END 
290 . PRINT"HIBA•“;PEEK<63 > +256*PEEE<64> 

300 DATA 20,FD,AE,20,SA,AD,20,F7,39 

301 DATA B7, A5,, 14,85, FB, A5, 15,85,2F 

302 DATA FC, 20, FD, AE, 20, SÍD, BO, 78,9A 

303 DATA A9,01,85,01,02,00,86,FF,57 

304 DATA A0,©0,B1,47,C9,©8,F©,OA, 63 
385 DATA A9,07,85,01,58,A2,19,4C,95 

306 DATA 3fi,A4,CS,B1,47,85,FD,C8,E8 

307 DATA 81,47,85,FE,A0,80,84,02,Al 

308 DATA B1,FD,C9,2A,F©,04,18,4C,F9 

309 DATA 4B,C0,3S,26,02,C8,C0,03,F8 

310 DATA D0,EE,A5,02,A4,FF,91,FB,94 

311 DATA 2O,68,C0,E6,FF,C8,C0,08,BD 

312 DATA D0,BE,09,07,85,Öl,58,60,7C 

313 DATA 18,05,47,69,83,85,47,A5,E1 

314 DATA 48,69,00,85,43,60,FF,FF,DC 

315 RÉM ============i=============W== 


REBÜV. 


O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 
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SZOFTVER 
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o 

o 

o 

o 
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o 

o 

o 

o 

o 

o 

o 

ü 

o 

o 

o 

o 

o 


100 RÉM" 

105 RÉM" 

110 RÉM" 

115 RÉM" 

129 RÉM" 

125 RÉM" 

13© RÉM" 

135 ' 

140 10=49152 • V=49750 

145 DEFFNR<X>=ASC<MID*<A*, X, 1 > >-48*7* 
< MID$<Fi#, X, 1»"@“> 


KARAKTER MOZGATÁS 
MEXFlK IT ASBAN 
COMMODORE 64 


IRTA • JACKIE MAESTRO 


15G 

155 

160 

165 

170 


FÓR I=K T0 V STEP 8>S=0 
iiFÓR J=0 TO 7 
*••READ Rí 

• ■■ < R«16*FNA< 1 >+FNR<2> 

< 1 > POK'E I+J, A • PR I NT " Ti" ; I + J 


175 


'■S=S+R 


ISO 

185 

190 

195 

200 

205 

210 

215 

220 

225 

230 

235 

240 

245 

250 


260 

265 

270 

275 

230 

285 

290 

295 

300 

305 

310 

315 

320 

325 

330 

335 

340 

345 


■•NEXT 
■•READ M- 

< ■ A= .16#FNR < 1 > +FNA < 2 > 

IF C SAMD255 >bRTHENHEXT• PRINT"OK"■ENp 
PRINT"HIBA>";PEEK < 63 > +256#PEEK< 64 > 
DATA 20 , FD , AE , 20 , 9E , 137, SE 1 4E , 1C 
DATA C2,E0,28,90,03,4C,48,02,A3 
DATA 20,FD,AE,20,9E,B7,SE,4F,1D 
DATA 02,E0,19,B0,F0,20,FD,RE, 26 
DATA 20,9E,B7,8E,50,C2,20,FD,32 
DATA AE,20,9E,87,8E,51,C2,20,E4 
DATA FD,AE,20,9E,B7,E0,00,FO,F0 
DATA D4,E0,03, G0 ,00, 86 ,02,38,F7 
DATA A9,02,E5,02,SD,13,01,A9,90 
DATA DC,E9,00,80,14,01,20,FD,44 
DATA AE,20,9E,B7,SE,52,02,EC,B1 
DATA 4E,02,B0,03,4C,48,B2,20,29 
DATA FD,AE,20,9E,87,8E,53,02,03 
DATA EC,4E,02,F0,02,00,ED,20,AB 
DATA FD, AE, 20,9E, 87, SE, 54, 02 ..ÓI¬ 
DAT A EC,4F,C2,F0,02,B8,DD,20 > 9C 
DATA FO,AE,28,9E,87,©E,55,02,05 
DATA EC,4F,C2,90,CF,20,FD,AE,27 
DATA 20,9E,B7,SE, 56 ,02,E0,00,FB 
DATA DO,00,78,B9,31,80,14,03.03 
DATA A9,EA,80,15,03,58,60,A9,99 
DATA 00,85,FF,A5,CE-8D,5A,02,A© 

DATA FID, 87,02,8D, 5B , 02,38,20,38 
DATA F0,FF,8E,59,C2,8C,58,02,3E 
DATA 18, AE, 4F, 02, AC, 4-E, 02,20, B3 
DATA F0,FF,A5,D1,18,6D,4E,02,FA 
DATA 85,FB,85,FD,A5,D2,69,00,E2 
DATA 85, FC, 18, 69,04,85, FE", 18,71 
DATB AC,58,02,RE,59,C2,20,F0,9F 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


350 

DATA 

355 

DATA 

360 

DATA 

365 

DATA 

370 

DATA 

375 

DATA 

380 

DATA 

385 

DATA 

390 

DATA 

395 

DATA 

400 

DATA 

405 

DATA 

410 

DATA 

415 

DATA 

420 

DATA 

425 

DATA 

430 

DATA 

435 

DATA 

440 

DATA 

445 

DATA 

450 

DATA 

455 

DATA 

460 

DATA 

465 

DATA 

470 

DATA 

475 

DATA 

480 

DATA 

485 

DATA 

490 

DATA 

495 

DATA 

500 

DATA 

505 

DATA 

510 

DAT A 

515 

DATA 

520 

DATA 

525 

DATA 

530 

DATA 

535 

DATA 

540 

DATA 

545 

DATA 

550 

DATA 

555 

DATA 

560 

DATA 

565 

DATA 

570 

DATA 

575 

DATA 

580 

RÉM 


READV. 


FF,A0,00,AD,51,02,91,FB,EB 
AD,50,02,91,FD,78,A9,02,70 
8D,14,©3,A9,Cl,80,15,03,83 
58, 60,E6,FF,A5,FF,CD,56,64 
C2,F0,03,40,31,EA,R9,00,05 
85,FF,AD,80,DC,80,57,02,83 
29,0F,09,0F,F0,ED,29,01,17 
D0,45,AD,4F,02,CD,54,02,86 
F0,30,A0,00,AD,5A,02,91,27 
FB, FlD, 5B, 02,91, FD, 38, A5,30 
FB,E9,28,85,FB,A5,FC,E9,16 
00,85,FC,38,A5,FD,E9,28,60 
85, FD, A5, FE, E9,00,85, FE ,,91 
CE,4F,02,81,FB,80,5R,02,34 
B 1,FD,80,58,02,AD,51,02, 18 
91,FB,AD,50,02,91,FD,AD- 86 
57,02,29,02,D0,45,AD,4F, 55 
02,CD,55,02,F0,3D,AÖ,00,73 
AD, 5A, 02,91, FB, AD, 5B, 02, 1. F 
91,FD,18,A5,FB,69,28,85,50 
FB,A5,FC,69,00,85,FC,18,9E 
R5,FD,69,28,85,FD,A5,FE,58 
69,©0,85,FE,EE,4F,02, 81,90 
FB,8D,5A,02,B1,FD,8D, 5B, 3A 
02,AD,51,02,91,FB,AD,5©,08 
02,91,FD,AD,57,02,29,04,43 
00,45,AD,4E,02,CD,53,02,B4 
F0,3D,A0,00,AD,5A,02,91,27 
FB,AD,58,02,91,FD,38,A5, 30 
FB,E9,©1,85,FB,R5,FC,E9,EF 
00,85, FC, 38, A5, FD, E.9,01,45 
85,FD,A5,FE,E9,00,85,FE,91 
CE,4E,C2,B1,FB,8D,5A,02,33 
81,FD,80,58,02,AD,51,02,18 
91,FB,AD,5®,02,91,FD,AD,86 
57,C2,29,08,00,45,AD,4E,5A 
02,CD,52,02,F0,3D,A0,00,70 
AD, 5A, 02,91, FB, FID, 58,02, 1F 
91, FD, 18, Fl5, FB, 69,01,85,35 
FB,A5,FC,69,00,85,FC,18, 9E 
A5, FD, 69,01,85, F 0, A5, FE, 31 
69,00,85,FE,EE,4E,02,B1,9B 
FB,SD,5A,02,B1,FO,8D,5B,3A 
02,AD,51,02,91,FB,AD, 50 ,08 
02,91, FD ,,4C ,31, EA, 03,03, BD 
ö1,A©,27,00,00,18,00,77,57 



O 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


Képernyő görgetés 


Ha beadjuk a 
SYS 59626 

utasítást, az egész képernyő egy sorral feljebb tolódik. Fordítva 
is megy ez, mégpedig a 
SYS 59749 

utasítással. Ennek a hatására az egész képernyő minden sora egy 
sorral lejjebb tolódik. 

Az egész képernyő lefelé görgetéséhez a kurzort a képernyő 
első sorába kell léptetnünk, és a számítógépet meg kell bűvölni a 
POKE 214,255: SYS 59749: SYS 58640 
utasítássorral. 


Gépi kódú programok 
betöltése 

A C64 — amikor betöltünk egy gépi kódú programot — első 
programsorként mindig végrehajt egy GOTO-t. Az alábbi kis 
programmal a gépi kódú programok egyszerűen tölthetők be 
egymás után. 

10 IF A = 0 THEN A = 1: LOAD "PRG.1",8.1 
20 IF A = 1 THEN A = 2: LOAD "PRG.2",8,1 
30 IF A = 2 THEN A = 3: LOAD "PRG.3",8,1 
és így tovább. 
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KITEKINTŐ 


MEGÉRI? 

Kickstart 2.0 ^ 


Az Amiga 3000-es és különböző kiszerelései (T, UX... — 
öt féle változat), új processzorúnak (M68030) és egyéb benne 
lévő nyalánkságoknak (M68881/2...) köszönhetően elkápráztat¬ 
ta, s gondolkodóba ejtette a hagyományos 68000-es amigások 
táborát. 

Az Amiga 3000-ben mutatkozott be először a Commodore 
új ásza, a 2.0-ás operációs rendszer. Ezt a továbbfejlesztett 
ROM-ot csak ’91 augusztusától építik be az új gépekbe, az odáig 
legyártott és eladott rendszerekben csak egy bootROM volt talál¬ 
ható, amellyel a még csak lemezen lévő, nem végleges (Alfa, 
Beta-teszt) ROM-ot tudtuk betölteni. Ez, hogy egy rendszert tu¬ 
lajdonképpen előbb eladnak, minthogy az. készen lenne, egy 
ügyes húzás, amivel a felhasználókat is bevonják az új rendszer 
tesztelésébe és reklámozásába. 

Természetesen az új verziójú ROM egy teljesen új támogató 
software-t is igényelt, és így a Commodore fejlesztői 
„kénytelen-kelletlen” megalkották a 2.0-ás Workbench-t is. 
Most elkezdődő sorozatunkban ezzel szeretnénk megismertetni 
az olvasót egy kicsit közelebbről. 

Gondolom az Amiga 3000-es a legtöbb felhasználónak csak 
elérhetetlen álma marad, ezért sokan csak legyintenek a 2.0-ás 
rendszer hallatán, mondva: „ismét egy használhatatlan cikk”, 
pedig nem biztos, hogy helyesen gondolkodnak. A Commodore 
a 2.0-ás rendszerrel nem egy 68030-asra épülő software-l készí¬ 
tett, hanem egy teljesen rugalmas más 68000-es Amigákra is 
adaptálható programot. Ezt a tulajdonságot már el is kezdték ki¬ 
használni, és most már az Amiga 500-asban is üdvözölhetjük az 
új ROM-ot! 

Akik követték az 500-as gépsorozat fejlődését megállapít¬ 
hatják, hogy ez már sorozatban a harmadik ROM 1.2, 1.3, 2.0), 
ami a legkisebb testvérbe kerül. A Commodore ezzel a „ma¬ 
nőverével” igencsak kitágította a 2.0-ás rendszer piacát, és az 
utána való érdeklődést, ezért indokolt ennek az írásnak a megje¬ 
lenése. 

Azért valószínű még így is sokan tartózkodnak és tartózkod¬ 
ni fognak az új rendszertől, mondván: nincsenek meg a megfele¬ 
lő kompatibilitási feltételek. Azt nem mondom, hogy igazuk 
van, de mielőtt a lényegre térnénk nem árt ezt a kérdést kicsit 
jobban megvizsgálni. A gyári ismertetők szerint a 2.'0-ás rend¬ 
szer alulról 90%-ban kompatibilis a régi 1.3-assal. Ezt az értéket 
a Beta-teszt során lefuttatott 1000, gondosan kiválasztott prog¬ 
ram alapján állapították meg. Ennek ellenére nem szabad vakon 
hinnünk és rohanni egy új gépet vásárolni — félve a lemaradástól 
—, mert ez a 90% nem mindig igaz és ezt tapasztalati úton 
könnyen beláthatjuk. 

A felhasználói programok nagy része (85—95%) valóban 
működik, de mindenki találhat a gyűjteményében olyan progra¬ 
mot, amit nem igazán tud működésre bírni. Ezek elsősorban 
apró kis segédprogramok, de a már amúgy is érzékeny vesztesé¬ 
geinket kiegészíti néhány nagyobb program is (pl. SoundTracker 
összes verziója és általában a zenei programok...). 

A játékok kompatibilitása már nem ilyen kedvező (kb. 
50%), és ez az amiért nem szabad elhamarkodottan dönteni. Tu¬ 
dom most sokan azt mondják: kár, hogy az Amigára lehet 


joystick-ot csatlakoztatni, de azért vannak néhányan, akik keves¬ 
lik a joy-portok számát. Tehát a következő bekezdés csak nekik 
szól. 

A nem működő programok közé tartozik az Out Run, Kick 
Off, Jumping Jackson, Lotus Esprit..., hogy csak a régiekből 
említsünk, viszont így is üzemképes pl. az Indy 500, Harvey Da- 
vidson, Ninja Rabbit... és meglepetésre a Beast is. Néhány prog¬ 
ram csak menet közben egy bizonyos résznél akad ki, ezért a 
programok működéséről csak azok végigjátszásával alkothatunk 
igazi véleményt. 

A letörölhető programok számát gyarapítják az elsőgenerá¬ 
ciós, mindegyhogyhogycsakműködjön intrók, demók is. 

Aki tehát csak játszadozni kíván a géppel, annak nem feltét¬ 
lenül javasolt egy gyors bevásárló túra, mivel a fenti nehézségek 
miatt az 1.3-as még a felszínen marad egy jódarabig, sőt a piacon 
hamarosan meg fog jelenni egy kiegészítés (A2000-rc a Pulsar 
cég terméke már kapható), amely a legalább 1 MB ChipRAM-os 
gépekre csatlakoztatható, és a 2.0-ás ROM-ot valamint a támoga¬ 
tó softwareket (Workbench, Extrás) tartalmazza. 


A Workbench 2.0 

Ha egy ismeretlen városba érkezünk, hiába vannak ott köz¬ 
lekedési jelzések, hiába van jó térképünk, valószínűleg számos 
hibát fogunk elkövetni, és ha célhoz érünk, nem biztos, hogy azt 
a legjobb útvonalon tettük. 

Hasonló helyzet előtt állnak azok az Amiga tulajdonosok, 
akik az új OS 2.0-ás változatával rendelkeznek. 

Az új software-nek a tudását ás fejlettségét nem igazán tud¬ 
juk lemérni a 2.0-ás verziószámból, de némi fogalmat alkotha¬ 
tunk róla, ha megnézzük az 1.3-as utáni óriási ugrást. Ez olyan, 
mintha az érdekelt fejlesztők eddig a pontig megspórolták volna 
az összes külső, kényelmi és képességbeni változtatásokat, csak 
azért, hogy egyszerre, robbanásszerűen zúdíthassák nyakunkba 
az új finomságokat. Tulajdonképpen a 2.0-ás szám nem egysze¬ 
rűen egy továbbfejlesztést jelöl, hanem egy teljesen új rendszert, 
egy tiszta lapot is. Ezért sem kapta az új operációs rendszer az 
előre beharangozott 1.4-es jelölést. 

Az előző Workbench verziók ismerői biztosan találnak — 
mert találniuk kell — hasonló alkotóelemeket a v2.0-ban, de már 
az első alkalommal rá kell jönniük, hogy itt mégis minden új és 
más. A valóság az, hogy a dolgok igenis nagyon különböznek 
az eddig megszokottaktól. Ennek az óriási különbségnek az az 
oka, hogy a Workbench az Amigának egy olyan különleges ré¬ 
sze, amely a legutóbbi 5 évben (a version 1.0 óta) a legkeveseb- 
bett változott. 

Valószínűleg már az első lépések mindenkit meg fognak 
győzni arról, hogy itt minden drámaian megváltozott. 

Elsőnek bizonyára az új típusú window kialakítás ötlik a sze¬ 
münkbe, ami egyben hamarosan hangos nemtetszésünknek for¬ 
rása is lesz. Első látásra az új ablak esztétikusabb lett és ezt senki 
nem vonhatja kétségbe, de jóval bonyolultabb rajzolatot is ka¬ 
pott, amit azt eredményezi, hogy a színárnyalatok kiválasztásá- 
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nál még jobban meg van kötve a kezünk, ha nem akarunk egy 
gondosan megtervezett „hulladékszínű” képernyőt kapni ered¬ 
ményül. 

Ha működésbe hozzuk a Workbench rendszerét, nyomban 
láthatjuk, hogy az ígéretekhez híven egy teljesen új, „átöltözte¬ 
tett” grafikai felületen dolgozhatunk, melynek kialakításán va¬ 
lószínűleg többet dolgozott a formatervező grafikus, mint az ed¬ 
digiekén összesen. 

Az új színeket gondosan választották ki, úgy, hogy a most 
divatos domborított, 30-as képernyők minden követelményének 
megfeleljen. Ezzel és még néhány apró változtatással (ezekről 
később lesz szó) egy igen esztétikus és meglepően hivatalos meg¬ 
jelenésű képernyőhöz jutunk, amely már sokkal valódibb, „kéz¬ 
zelfoghatóbb”, mint az eddigi megszokottak. 

Az új ikonok stílszerűen, egy kiemelt síkon helyezkedve el 
gombokként funkcionálnak, melyekre „rákiikkelve” besüllyed¬ 
nek a képbe. Amúgy ez a hatás nem minden Workbench képer¬ 
nyővel érvényesül megfelelően, a fent említett színproblémák 
miatt. Tehát előfordulhat, hogy egy ikon alapállapota a süllyesz¬ 
tett és az aktivizált a kiemelt. 

Az új Workbench a disk-ikonokat opcionálisan egy ablak¬ 
ra helyezi tágabb teret engedve a manipulálásnak. Az új típusú 
ablakon és képernyőn a gadgetek ugyan megfogyatkoztak, de a 
maradék sokkal jobban ellátja feladatát, így gyorsabban tud¬ 
juk megtalálni a keresett ikont a képernyők és ablakok sokasá¬ 
gában. Most a jobb télső sarokban egyetlen gom helyettesí¬ 
ti a régi front/back gadget párt úgy, hogy egyszeri nyomásra elő¬ 
re hozza az ablakot/képernyőt és a másodikra visszaküldi hátra. 

A zoom gadget a jobb oldalon, a régi front gadget helyén, 
egy új kiegészítés. Amikor megnyomjuk, akkor az érintett ablak 
azonnal télveszi minimális, újabb nyomásra pedig maximális 
méretét. Az ablakgörgctő nyilacskáknak csak a helye változott, 
de ez is jelentősen megkönnyíti használatukat, mivel kereséskor 
nem kell az ablak két vége között szaladgálni a mutatónkkal. A 
régi lemeztelítettséget ábrázoló „benzinmutató” is a tisztogatás 
áldozata lett. Helyette az ablak felső sávjában elhelyezkedő ada¬ 
tokból tudhatjuk meg a lemez elfoglalt és szabad területeit száza¬ 
lékos és hozzávetőleges (M,B, KB) kimutatásban. A fő Work¬ 
bench képernyőn is változott egy kicsit a szabad memória kijel¬ 
zés. Most a rendszer megkülönböztetve tájékoztat a Chip és az 
egyéb (Fást) memóriák állapotáról. 

Az új Workbench nemcsak jobban néz ki, de sokkal jobban 
is működik, mint elődei. 

Például nemcsak azokat a programokat tudjuk elérni, ame¬ 
lyek rendelkeznek ikonnal, hanem a Windows menü Show/All 
files parancsával bármelyik file-t és könyvtárat megjeleníthetjük 
mind ikonos, mind hagyományos, listás formában. Ebben az 
esetben valószínű, hogy sokáig kell kutatni a rengeteg ikon kö¬ 
zött, de megéri. 

Ikonos ábrázolásnál megszemlélhetjük az új Busy ikont, 
amely leginkább egy suszterkalapácsra hasonlít, és csak virtuá¬ 
lis ábra, tehát nem kerül rá automatikusan a lemezre. Ez utóbbi 
hatást csak úgy érhetjük el, ha az ikont bevezetjük az IconEdit 
pr ramba és onnan lemezre mentjük. 

A régi „alvó” Zzzz rajzot most egy stopperóra helyettesíti, 
ami véleményem szerint nem volt egy igazán jó ötlet. 

Egy másik újdonság, hogy például a C: könyvtár program¬ 
jait az új ikonnal futtatni is tudjuk, azokat is, melyek bemenő 
információra várnak. Ezeket az argumentumokat egy input ab¬ 
lakban adhatjuk meg, amely megengedi, hogy tetszőleges infor¬ 
mációt hozzáfűzzünk az utasításhoz, csakúgy, mintha CLI-ben 
tennénk. 

Nem feltétlenül szükséges megjeleníteni ikonnal az utasítá¬ 
sokat, mert a Workbench menü Execute Command parancsával 
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is hasonló hatást érhetünk el, csak itt az utasítást is nekünk kell 
beírni. Adjuk ki mondjuk a Dir parancsot, ekkor megjelenik egy 
ablak és benne az aktuális könyvtár listája. Ez valószínűleg, 
hogy nem fér rá az aprócska ablakra, de nem kell aggódni, mert 
a zoom gadgettel megnövelt ablak megmutatja a már jóval előtte 
kiírt információkat is. 

Előfordulhat, hogy egyes feladatoknál az ikonos megjelení¬ 
tés nem a legelőnyösebb. Ebben az esetben a Window menü 
View By/Name, Size, Date funkcióival egy DIR-szerű szöveges 
listát kaphatunk betű, méret, dátum szerint rendezve. Ez a lista 
azonban egy különleges funkcióval is rendelkezik, miszerint a 
felsorolás minden sora tulajdonképpen egy ikon, tehát elmozdít¬ 
hatjuk, klikkelhetünk rá stb... Az Icon menü Information opció¬ 
ja segítségével parancsokat fűzhetünk az ikonokhoz, így ponto¬ 
san megtervezhetjük egy parancssorozat végrehajtásának sor¬ 
rendjét és időzítését. 

Szintén új az a funkció, mellyel egyszerre több ikont is kivá¬ 
laszthatunk. Ennek egyik módja, hogy rámutatunk a Window 
menü Seleet Contents funkciójára és ezzel az aktuális ablak 
összes ikonja kiválasztódik. Eredményesebben használható a 
drag-sclccting rendszer amelynek hatása hasonló az előzőekhez, 
azzal a különbséggel, hogy ezzel egyes ikoncsoportokat is kivá¬ 
laszthatunk. Ha rámutatunk a képernyő egy tetszőleges pontjára 
és nyomva tartva a bal egérgombot elmozdítjuk az egeret, egy 
négyzet méretét változtathatjuk. Elengedve a gombot a négyze¬ 
ten belüli ikonok kiválasztódnak. 

A 2.0-val búcsút mondhatunk az előző Workbench Empty 
fiókjának is, mert ennek feladatát a Window menü New Drawer 
opciója tölti be, ezentúl ezzel készíthetjük új alkönyvtárainkat. 

A Workbench 2.0 szintén felmutatja a multitasking néhány 
új bizonyítékát. Például a Rcname funkció már nem szakítja meg 
az összes működő programot, és a programok betöltésekor már 
alig találkozni a régi Zzzz-nek megfelelő stopperrcl, ehelyett 
egy töltésre utaló „Attempting to load program...” felirat fog 
megjelenni és mi a töltés alatt is dolgozhatunk. 

A jobb egérgombot felruházták egy Cancel funkcióval, 
amely törli a még nyomva tartott bal gomb hatását. Ennek igazi 
hasznát akkor érezzük, mikor megváltoztatjuk egy ablak mére¬ 
tét, de menet közben rájövünk, hogy ez mégsem lesz így jó. Ré¬ 
gen ha vissza akartuk állítani az eredeti állapotot, az csak szeni- 
fájdító odafigyeléssel volt lehetséges, most megnyomjuk a jobb 
gombot, s lám minden visszatért a régibe. 

Ugyancsak jelentős újdonság az Icon menü Leave Out funk¬ 
ciója, mellyel a sokszor használt programjainkat automatikusan 
az alapképernyőn jeleníthetjük meg. Ezt már a régi Workbench 
is tudta, de most nem kell állandóan kiválasztanunk őket, hanem 
elég egyszer és ezentúl mindig így fognak megjelenni, egészen 
addig, míg ki nem adjuk a Pút Away utasítást. 

Amíg a Workbench disk egyes programjainak egy része el¬ 
tűnt, addig a másik részük teljesen átalakult. 

A legnagyobb változást a Preferences-ben tapasztalhatjuk. 
Az előző verziók egyetlen preférences editort alkalmaztak, és az 
adatokat egy devs:system-configurádon nevű fájlban raktároz¬ 
ták, most az új preferenc tulajdonképpen egy igen tekintélyes 
programcsomag sok kis programmal. Egy részük hasonlít a régi 
preferenceshez (pl. printer, dátum...), de találunk néhány telje¬ 
sen újat is (pl. overscan, sereenmode...). Ezeknek mind saját 
szerkesztője van és a kimentett adataik egy env:sys könyvtárban 
tárolódnak. Természetesen ezek a programok is használják a régi 
system-configurtion-t amikor csak lehet. 

Mivel az új prefs az adatait külön is tárolja, természetesnek 
tűnnek olyan dolgok, mint a pointer brush formájú elmentése, 
vagy egy funkció több formában való tárolása. így például, ha 
kimentünk több képernyőformátumot (pl. 640 x256, 640 x512) 
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a Prefs/Prcsets alkönyvtárba, akkor egyszerűen az ikonjukra 
klikkelve változtathatjuk munkaasztalunk felbontását. 

A prefs programjainál megoldották azt a kényelmetlen- 
ségi problémát, hogy a régi program csak arra a lemezre men¬ 
tette el adatait, amelyikről meghívták. Most menüből is le¬ 
hetőségünk van kimenteni az adatainkat a SaveAs, Open funk¬ 
ciókkal. 

Az új Palette editor lehetővé teszi 10 előre beállított szín¬ 
készlet variálását a jobb Amiga és a szám billentyűk segítségé¬ 
vel . Mivel a 2.0-ás rendszer már támogatja az overscan (a legna¬ 
gyobb látható képernyő) használatát, így helyet kapott a prefs- 
ben egy overscan editor is, mellyel tetszés szerint beállíthatjuk 
képernyőnk overscan méreteit. 

A programozók számára az első izgalmakat valószínűleg a 
ScreenMode nevű prefs program jelenti, mert ízelítőt kaphatnak 
az űj ECS Denis chip tudásából. Itt állíthatjuk be képernyőnk 
tulajdonképpeni méreteit és a megjeníthető színek számát. Alap¬ 
állapotban négy variáció közül választhatunk: 


— PÁL: Hires 640x256 16 szín 

— PÁL: SuperHires 1280x256 4 szín 

— PÁL: Hires-Interlaced 640x512 16 szín 

— PÁL: SuperHires-lnterlaced 1280x512 4 szín 


Ehhez jön még hozzá az Extrás lemez Monitors fiókjában 
található három monitor rendszer: NTSC, A2024, Multiscan. 
Az NTSC felbontás nem hiszem, hogy érdekes lenne, mert itt 
csak hagyományosan a vízszintes sorok változnak 200, illetve 
400 (interlaced) pixelre. Az utóbbi két rendszer viszont már ér¬ 
deklődésre tarthat számot. Aki rendelkezik egy Multiscan moni¬ 
torral két újabb felbontással gazdagodhat: 

— Productivity 640 x 480 4 szín 

— Productivity-Interlaced 640x960 4 szín 

Az A2024 tulajdonosok pedig a: 

— A2024 (10/15 Hz) 1008X 1024 4 szín 

képernyő látványában gyönyörködhetnek. 

Érdekes hatásokat érhetünk el, ha egy egyszerű A1084-es 
monitoron próbáljuk ezen utóbbi képernyőket bekapcsolni. 

Ha azt akarjuk, hogy a Workbench automatikusan Multis¬ 
can vagy A2024-es állapotban induljon, akkor az Extrás lemez 
Monitors fiókjából át kell húzni az érintett ikont a Workbench 
MontorStore szekrénykéjébe. 

A SreenMode program még egyéb érdekességeket is tarto¬ 
gat számunkra. Megfelelő méretű memóriával olyan képernyő¬ 
ket is generálhatunk, melyek „lelógnak” a monitorról (pl. 
HÍRES 1000 x 1000). Ha bekapcsoljuk az AutoScroll funkciót, 
akkor a képernyő automatikusan gördülni kezd, ha a szélére húz¬ 
zuk a mutatót. Új képernyőnket mozgathatjuk minden irányba 
a címsávnál fogva is vagy ha lenyomva tartjuk az opcionálisan 
(IControl-ból) választható Screen Drag billentyűt és az egeret 
húzogatjuk. Ez utóbbi funkció eredményesen használható min¬ 
den olyan képernyőnél, ahol nem látszik a címsáv. 

Egy másik prefs program, a WBPattcrns editor egy igen lát¬ 
ványos funkcióval szolgál (sajnos csak látványos, szerintem nem 
sokra jó). Itt különböző, általunk meghatározható mintákkal 
tölthetjük fel az ablakokat és képernyőket, így jól láthatóén el 
tudjuk különíteni őket. A megrajzolt kis textilmintákat a prog¬ 
ram szabványos Brush formában menti el, tehát azokat egy rajz¬ 
programmal is elkészíthetjük. 

A Font nevű preferences program egy másik új funkciót tesz 
lehetővé, miszerint a hagyományos Topáz betűkészlet helyére 
más betűtípusokat is beilleszthetünk, még pedig mást és mást 
az ikonok alá, az ablakok, képek címsávjaiba, menükbe és ma¬ 
gukba az ablakokba is. Mivel néhány program nem kedveli a 
nem standard betűkészleteket és elszáll, ezért szerintem ez is 
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csak egy látványossági funkció, és csak a programozók számára 
használható igazán. 

Most, hogy a szöveg tárgyán vagyunk, hasznosnak érezzük 
megemlíteni, hogy a 2.0-ás rendszer már magába foglalja a jó 
öreg FF (Fást Font) nevű programocskát, és a ColorFonts stan¬ 
dard támogatást (ez utóbbiból következik, hogy multicolos betű¬ 
készlet is beiktatható az új Workbench-be). 

Az ROM 2.0-nak egy szerintünk zseniális, új funkciója, a 
bitmap betűkészlet beosztás, amivel lehetőség nyílik egy meg¬ 
rajzolt betűkészlet tetszőleges méretben való megjelenítésére. 
Gondolom ezt mindenki ki akarná próbálni, és akinek van rá 
módja, annak csak a WB-menü Execute Command parancsában 
a „SetFonl topáz 14 scale” utasítást kell begépelnie, és lám egy 
ablakban máris a 14 magas scalcd topázt nézegethetjük. A betűk 
kidolgozása természetesen jóval darabosabb, de ez a scalcd funk¬ 
ció ára. Valószínűleg a Commodore fejlesztőinek sem tetszhetett 
igazán ez a megoldás, mert állításuk szerint lázasan dolgoznak, 
hogy a következző ROM-verzióban már ki legyen küszöbölve ez 
a hiányosság. 

De nézzünk szét most más WB fiókokban is. 

Itt van elsőnek a System könyvtár, ahol szintén nagy változá¬ 
soknak lehetünk tanúi. Eltűnt a már matuzsálemnek számító 
FastMemFirst (most a ROM-ba van beépítve), de megjelent egy 
új, a közelmúltban nagy feltűnést keltett program, a RexxMast. 
Ez tulajdonképpen az ARexx nyelv parancsértelmezője. Az 
ARexx külsőleg kicsit hasonlít a CLI-re, de egy klasszissal jobb 
annál. Használatával jelentősen megkönnyül a programok kö¬ 
zötti kommunikáció és ezzel tág lehetőség nyílik az együttdolgo¬ 
zásra. Az ARexx az utóbbi időben igen sok és erős támogatást 
kapott (több felhasználói programot már ARexx funkciókkal 
dobnak a piacra, vagy egészítenek ki) és így lehetővé vált, hogy 
valóban egy jó és széles körben használható eszköz legyen. Éz 
a nyelv tulajdonképpen az Amiga multitasking rendszerének egy 
újabb kimagasló bizonyítéka. 

Az Utilites fiókban már hiába keressük a NotePad-et, de ta¬ 
lálunk egy új funkciót, a Display-t. Ezzel a programmal tetszőle¬ 
ges típusú IFF formátumú ábrákat jeleníthetünk meg a képer¬ 
nyőn, vagy az aktuális kimeneten. 

Másik új programocska a CommoditiesExchange, mellyel 
egy régi problémát oldhatunk meg. Az 1.3-as WorkBench-bc 
utólagosan több kis funkció lett beépítve (pl. Blanker, NoCaps- 
Lock, IHelp, AutoPoint...), ezek mind hotkey funkciók, tehát 
egy gombnyomásra, vagy bizonyos idő eltelte után aktivizálód¬ 
nak. Több ilyen program használatakor előfordulhatott, hogy 
ezek a hotkey funkciók egymásba ágyazódtak és nem megfelelő 
működésükkel sok zavart idéztek elő. A CommoditiesExchange 
állandó berendezéssé teszi ezeket a programokat, megóvva a fen¬ 
ti prbémától. 

Most nézzünk szét egy csöppet az Extrás lemezen is. A 
Tools fiókban egy átdolgozott IconEdit programmal találkozha- 
tuk. Abban nem vagyok biztos, hogy könnyebb vele az ikonok 
tervezése, de sokkal esztétikusabb (amigásabb) lett és egy sor 
új funkciót kapott (ami szintén egy szempont). A legszimpatiku¬ 
sabb újítás a smat-window rendszer, amely nagyban megkönnyí¬ 
ti az ikonok programba való behívását (csak be kell őket húzni 
a szerkesztő ablakába). 

Ezek után indítsuk el a CLI programot. Az ígérteknek meg¬ 
felelően a Shell a CLI-be lett integrálva, egy csomó fáradságot 
megspórolva nekünk. Az itt tapasztalható legnagyobb újítás, 
hogy egy rakás parancs — szám szerint 33 — INTERNÁL lett, 
tehát a ROM-ba építették be (pl. Alias, CD, Echo...), a lemezre 
így „csak” 46 került. Ezen programok felsorolása a már régről 
ismert Resident (szintén INTERNÁL) utasítással tekinthető 
meg. 
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Szemben az eddigi verziókkal, az új CLI parancsok jelentő¬ 
sen megrövidültek, ami nem hátrányos szempont a korlátolt le¬ 
mezkapacitás szempontjából. 

Egy másik hasznos kiegészítés a copy and pásté funkció be¬ 
építése a CLI-be. Ha végighúzzuk az. egeret bal gombjával le¬ 
nyomva a képernyőn, utunkat egy átszínezett mező kíséri. Ezt 
a mezőt a szövegszerkesztőkből ismert C and P rendszerhez ha¬ 
sonlóan átmásolhatjuk egy másik ablakba. így lehetőség nyílik, 
mondjuk a lemezlistát az Ed-be, vagy az Ed-ből a Memacs szer¬ 
kesztőbe átrakni. 

Végül nézzünk bele egy kicsit mélyebben a Workbench le¬ 
mez. rendszerkönyvtáraiba, ahol szintén sok minden átalakult és 


megváltozott. Általánosan azt mondhatjuk el, hogy a programok 
hossza megnőtt, például a Devs/narrator.device több mint 40000 
byte-al gazdagodott, de azért találkozhatunk rövidített újdonsá¬ 
gokkal is (pl. ahandlerek). Néhány új kiegészítéssel gyarapodott 
a Libs könyvtár (pl. commodities, iffparse library...) az új funk¬ 
ciók támogatása végett. Az L könyvtárból egy sereg program el¬ 
tűnt (Disk-validator, Newcn.handler, Shell-seg...) nagy helyet 
hagyva a lemezen... 

Ezzel a kis felsorolással véget ért a 2.0-ás rendszerek újdon¬ 
ságairól szóló leírásunk. Tisztában vagyunk vele, hogy közel 
sem adtunk teljes áttekintést, de nem is ez volt a célunk. Cikkünk 
csak egy jelentős újdonságra kívánta felhívni a figyelmet. 


Tévé-óra 


A program kezelése: 

Az időpont begépelése után, 

V — vége, STOP. 

A program célja: 

Az óra megjelenítése a számítógép segítségével a képer¬ 
nyőn. 

A program műfaja: 

Felhasználói program. 

A program leírása: 

A program W. BESENTH AL-J. MUUS: Plus/4 kézikönyv 
az összes tudnivalóval című könyvből lett kiírva, majd átdolgoz¬ 
va. Az elindítás után az időpontot kell beírni. Egymás mellé, 
számmal (OOPPSS) óra, perc, secundum. Kis türelem után 
megjelenik az óra rajzolata, mutatókkal, a potos idővel. Mellette 
digitálisan kijelezve Debrecen, New York, Tokió és London 
pontos idejével. Az unásig nézhető képernyő. A, ,v” billentyűvel 
a rendszerből kiléphetünk. 

Programozási feladatok: 

— az óra megjelenítése (a könyv íróinak érdeme) 

— digitális világóra megjelenítése 

— órák összehangolása. 

Megjegyzés: 

- „STOP” billentyű lenyomásakor az órák megállnak. 
Majd vakon beírva a „CONT” utasítást, a RETURN le¬ 
nyomásával az óra késés nélkül, újból pontos időt méri. 
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100 PRINT"&S?MSr;TAB(10);"W. BESENTHAL-J.MUUS :" 

105 RÉM 5XCLE1 

110 PRINT*UüüIfiMPLUS/4. KÉZIKÖNYV AZ ÖSSZES" 

115 RÉM 6X[JOBB] 

120 PRINT“ÍMilíTUDNIVALÓVAL. -CÍMŰBŐL ÁTDOLGOZTA" 

125 RÉM 4XCJOBB] 

130 PRINT'LüM ü H M&BiSiiiiStgiSaggÜiK SOOLSOFT?'' :SOUND 1,890,2 
135 RÉM 3XCLE] 13XCJOBB] 

140 FÓR QQ=1 TO 2500:NEXT QQ 

150 RÉM-TEVEORA -- 

160 DIM HXX(60),HYZ(60),MXX(60), MYX(60),SXX(60),SYX(60) 

170 X=100:Y=100:RA=0 

180 PRINT CHR$(147):SOUND 2,980,2 

190 INPUT" MüB EAZ IDŐPONT MOST (OOPPSS)";TI$:SOUND 1,900,1 
195 RÉM 2XCLE] [JOBB] 

200 PR INT "MISI KIS TÜRELMET... 2":SOUND 2,890,3 
205 RÉM [LE] [JOBB] [CTR/9] [CTR/0] 

210 RÉM - 

220 RÉM AZ ÓRAMUTATÓ ADATAINAK SZAMITASA 

230 FÓR W=450 TO 96 STEP-6 

240 RE=40:GOSUB 460 

250 HXX(T)=X2:HYX(T)=Y2 

260 RE=60:GOSUB 460 

270 MXZ(T)=X2:MYX(T)=Y2 

280 RE=70:GOSUB 460 

290 SXZ(T)=X2:SYX<T)=Y2 

300 T=T+1:NEXT 

310 RÉM-ÓRA RAJZOLÁSA- 

320 GRAPHIC 1,1:GOSUB 890 

330 RA=71:RE=80:FÓR W=450 TO 96 STEP-6:G0SUB 460:DRAW,XI,Y1 TO X2,Y2:NEXT 
340 RA=81:RE=85:FOR W=450 TO 96 STEP-30:GOSUB 460:DRAW,XI,Y1 TO X2,Y2:NEXT 
350 DRAW 0, X, Y TO MXX(MX), MYX(MX) :MZ=VAL(MID$<TI$, 3, 2)) :DRAW, X, Y TO MXX(MX),MYZ(MX) 
360 DRAW 0,X,Y TO HXX(HX),HYXCHZ) 

370 HX=(5*VAL(LEFT$(TI$,2)))+INT(MX/12):IF H%>59 THEN HX=HX-60 
380 DRAW,X,Y TO HXZ(HX),HYXCHZ) 

390 SX=VAL(MID$(TI$, 5, 2)) : IF SZOS1X THEN 400:ELSE 390 
400 DRAW 0,X,Y TO SXX(SIZ),SYX(SIX) 

410 DRAW,X,Y TO SXX(SX),SYXCSX):SOUND 1,1000,1 

420 GOSUB 520:GOSUB 540:GOSUB 560:GOSUB 580:GET P$:IF P$=“V“ THEN GOTO 1040 

430 IF SX=0 OR S1X=MX THEN SlX=SX:GOTO 350 

440 IF S1X=HX THEN SlZ=SX:GOTO 360:ELSE S1%=S7.:G0T0 390 

450 RÉM - SZOGFUGGVENYEK - 

460 Xl=X+INT(C0S(Wí3.14/180)*RA) 

470 X2=X+INT(C0S(W*3.14/180)*RE) 

480 Y1=Y-INT(SIN(W»3.14/180)*RA) 

490 Y2=Y-INT(SIN(W*3.14/180)*RE) 

500 RETURN 

510 RÉM ******************************* 

520 RÉM - VILÁG IDŐPONTOK - 

530 VI$=TI$:Q=1:GOTO 700 

540 VI$=TI$:BB=VAL(VI$)+180000:IF BB>=240000 THEN BB=BB-240000 
550 Q=2:GOTO 610 

560 VI$=T1$:BB=VAL(VI$)+80000:IF BB>=240000 THEN BB=BB-240000 
570 Q=3:GOTO 610 

580 VI$=TI$:BB=VAL(VI$>+230000:IF BB>=240000 THEN BB=BB-240000 
590 Q=4:GOTO 610 

600 RÉM - 

610 VI$=STR$(BB):AA=LEN(VI$) 

620 IF AA>6 THEN VI$=RIGHT$(Vl$,6):G0T0 700 
630 IF AA=6 THEN VI$=RIGHT$(VI$,5):GOTO 720 
640 IF AA=5 THEN VI$=RIGHT$(Vl$,4):G0T0 740 
650 IF AA=4 THEN VI$=RIGHT$(VI$,3):G0T0 760 
660 IF AA=3 THEN VI$=RIGHT$(VI$,2):G0T0 780 
670 IF AA=2 THEN VIS=RIGHT$(VI$,1):GOTO 800 
680 IF AA<=1 THEN GOTO 820 
690 RÉM - 
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700 V$(1)=(MID$(V1$,1,2)):V$(2)=(MID$(VI$,3,2)):VS(3)=(MID$(VI$,5,2)) 
710 VI$=V$(1)+":"+V$(2)+":“+V$(3):G0T0 840 

720 V$(])=(MID$(VI$,1,1)):V$(2)=(MID$<V1$,2,2)):V$(3)=(MID$(VI$,4,2)) 
730 VI$="0"+V$(1)+*:"+V$(2)+":”+V$(3):GOTO 840 
740 V$(1)=(MID$(VI$,1,2)):V$(2)=(MID$(VI$,3,2)) 

750 VI$="00:"+V$(1)+":“+V$(2):G0T0 840 

7S0 V$(1)=(MID$(VI$, 1, 1)):V$(2)=(MID$(VI$,2,2)) 

770 VI$=" 00:0“ +V$( 1) + '' : "+V$(2): GOTO 840 
780 V$(1)=(MID$(VI$,1,2)) 

790 VI$=“00:00:"+V$(1):G0T0 840 
800 V$(1)=(MID$(VI$, 1,1)) 

810 VI$=”00:00:0 n +V$(1):G0T0 840 
820 VI$=“00:00:00“:GOTO 840 

830 RÉM - 

840 IF Q=4 THEN CHAR 1,30,17,VI$:GOTO 880 
850 IF Q=3 THEN CHAR 1,30,13,VI$:G0T0 880 
860 IF Q=2 THEN CHAR 1,30,9,VI$:GOTO 880 
870 IF Q=1 THEN CHAR 1,30,5,VI$ 

880 RETURN 

890 RÉM-ÍRÁSOK- 

900 CHAR 1,2,0,“HUNGARY-BUDAPEST:" 

910 CHAR 1,29,3,“DEBRECEN:" 

920 CHAR 1,29,7,"NEW YORK:* 

930 CHAR 1,29,11,"TOKIO:" 

940 CHAR 1,29,15,"LONDON:" 

950 BOX 1,237,37,307,51 
960 BOX 1,237,69,307,83 
970 BOX 1,237,101,307,115 
980 BOX 1,237,133,307,147 
990 CHAR 1,29,20," COMMODORE “,1 
1000 CHAR 1,29,21," PLUS/4 “,1 
1010 CHAR 1,29,22," SOOLSOFT ",1 
1020 CHAR 1,29,24,”'V'= STOP" 

1030 RETURN 
1040 GRAPHIC 0 


O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


1050 PRINT" tMliflUftll VEGE. " 

1055 RÉM tCLR] 2XCLE] 3XCJOBB] 
1060 END 


New-rutin 

Rését után a program újra életre kelthető a következő pa¬ 
rancssorozat beadásával: 

POKE 2050,1 
SYS 42291 
POKE 46,PEEK(35) 

POKE 45,PEEK(781) + 2 
CLR 


Billentyűzet zár 

Mindenféle információ beadását a billentyűzetről meggátol¬ 
ja a POKE 649,0 utasítás, a (RUN/STOP) és (RESTORE) lezár¬ 
ható, érzéketlenné tehető a POKE 808,227 utasítással. Mindeze¬ 
ket feloldja a POKE 649,10:POKE 808,237 utasítássor. 

O 


Radián átszámítása fokra 

BASIC-ben ez rendkívül egyszerűen megoldható a 
DEF FNA (X) = (180 * X)/PI 

definiált függvénnyel. Ha X-nek a szög radiánban mén értékét 
adjuk, majd hívjuk a függvényt, eredményül a szög fokban mért 
értékét kapjuk. 

Negatív bájtok? 

A PRINT FRE(0) beadása után a C64 negatív számot nyom¬ 
tat ki. A FRE-funkció a C64 esetében mindig egy 16 bites egész 
(integer) számot ad ki. A legnagyobb ilyen szám 32768, vagyis 
2115. Ha a szabad memóriahelyek száma ennél nagyobb, akkor 
az előjelbitet is figyelembe veszi a funkció, és így adódik ki végül 
a negatív szám. A helyes eredményt tehát úgy kapjuk, hogy a 
kapott számhoz 65536-ot adunk. A legjobb, ha mindjárt így is 
írjuk fél a rendelkezésre álló memóriahelyek számának a lekér¬ 
dezését: PRINT FRE(0) + 2tl6. 
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Hobbi ELEKTRONIKA 


HARDVER 


C-64 bővítések 


Datassette-Datassette gyorsmásoló 
számítógépes kazettákhoz 


Egy egyszerű, de hasznos áramkör¬ 
rel szeretnék segíteni azoknak a Com- 
modore-tulajdonosoknak, akik nap mint 
nap találkoznak azzal a problémával, ami 
a szalagra történő programmásolás során 
keletkezik. Nagyon kellemetlen és sok 
bosszúságot okoz az, ha a baráti körben 
vagy a programbörzén megszerzett játék 
otthon az istennek sem akar bejelent¬ 
kezni. Ilyenkor nincs mit tenni, újra át 
kell másolni az eredeti programot, ha 
nem akarunk lemondani a vele való ját¬ 
szás öröméről. A probléma megoldására 
két lehetőség kínálkozik. Az egyik a fej 
beállítása pontosan olyan pozícióba, aho¬ 
gyan az az eredeti felvételnél volt. Ez 
nem túl szerencsés, mert ha indikálás nél¬ 
kül elállítjuk a fejet, előfordulhat, hogy 


ezután azok a programok sem jelentkez¬ 
nek be, amelyekkel addig nem volt prob¬ 
léma. 

A bátrabbak a fenti probléma elkerü¬ 
lésére azt a módszert követik a szalagról 
szalagra történő másolásnál, hogy a betöl¬ 
tő magnó csatlakozóját kihúzzák a gépből 
a program bejelentkezése után és rádug¬ 
ják a másolómagnót. Ez az, amit nem sza¬ 
bad megcsinálni, mert előtte nem lehet ki¬ 
kapcsolni a gépet, cnélkül pedig soha nem 
tudjuk, hogy nem keletkezik-e komoly 
kár. 

A probléma megoldására kínálkozik 
egy másik lehetőség is, amikor közvetle¬ 
nül szalagról szalagra másolunk, számító¬ 
gép közbeiktatása nélkül. Ezzel kiküszö¬ 
bölhetjük a program bemásolása során 


keletkező elveszett időt, másrészt meg¬ 
oldódik a fejállás problémája is. 

Az áramkör működése 

Az /. ábrán látható egyszerű áramkör 
két egymástól jól elhatárolható részre 
bontható. Az egyik a G,—G f , alkotta jel- 
frissítő kör, a másik az IC 2 -n alapuló 
tápegység. 

A jelfrissítő Schmitt-trigger beme¬ 
netű inverterekből áll. A G, bemenetére 
a jelforrásként használt magnó READ vo¬ 
nala csatlakozik. Az R 2 felhúzó ellenállás 
a nyugalmi állapot magas logikai szintjét 
biztosítja. 

Ha a READ bemenet logikai ,,H’-n 
van, a piros LED világít, ellenkező eset¬ 
ben a zöld. Ha a READ-re változó logikai 
szint, vagyis a program jele kerül, mind¬ 
két LED világít. A két LED így jól indi¬ 
kálja a program beolvasásának folyama¬ 
tát. Ha G ,-ra egy piezo hangsugárzót kö¬ 
tünk, akkor hang alapján is érzékelhetjük 
a program kezdetét, végét. Ez akkor érde¬ 
kes, ha a számláló állását rögzíteni kíván¬ 
juk a másolás során. 
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3. ábra 


A számláló állása rendkívül hasznos 
információ, ha a szalagra történő prog¬ 
ramkezeléshez a „Szalagcsévélő” progra¬ 
mot használjuk. Ez a program sok más 
magnókezelést segítő társával együtt meg¬ 
található a szerző Dataset nevű bővítőkár¬ 
tyáján, aminek leírása a C-újság 92/10-es 
számában megtalálható. 

A jclfrissítő kimenő jelét a G,-ről 
vesszük le és minden illesztőfokozat köz- 
beiktatása nélkül vezetjük a programot 
rögzítő magnetofon WRITE vonalára. 

A tápegységről röviden csak annyit, 
hogy azért láttuk el ezzel is az áramkört, 
hogy a számítógépre tényleg ne legyen 
szükség a másolás során. Ezek a magnók 
eredetileg ugyanis a számítógépből kap¬ 
ják a tápot. Mivel a két magnó együttes 
áramfelvétele még a legrosszabb esetben 
— a gyorscsévéléskor — sem haladja meg 
a 0,5 A-t, nyugodtan használhatunk csen- 
gőreduktort. Az egyenirányító híd és a 
stabilizátor IC (IC 2 ) is rajta van a panelen. 
A stabilizátor 6 V-os fix feszültségű. Ez a 
feszültség táplálja a magnók motorjait. 

Az elektronika +5 V-ja a táp-IC ki¬ 
menetére kötött két nyitóirányú diódán 
(D s , D 6 ) eső feszültség hatására áll be. A 
táp pufferja aC,, gerjedésgátló hidegítő 
kondenzátora a C 2 . 

Az áramkör szerelése, 
élesztése 

Az áramkör nem túl bonyolult, ezért 
elkészítéséhez szerényebb jártassággal 
rendelkező amatőrök is hozzáfoghatnak. 
Az egyoldalas nyák nyomtatási rajza a 


2. ábrán látható. Ha az alkatrész-beszer¬ 
zéssel vagy nyák-készítéssel gondunk len¬ 
ne, célszerű felkeresni a szerző üzletét, 
ahol a működő mintadarab megtekintése 
melleit komplett alkatrészcsomag vagy 
panel is vásárolható. 

A panelt 01 mm fúróval fúrjuk ki, 
majd vizsgáljuk meg, hogy nincs-e rajta 
zárlat vagy szakadás. A csatlakozók he¬ 
lyét a kontúrok mentén munkáljuk méret¬ 
re, majd ültessük be a 3. ábrán folytonos 
vonallal jelölt két darab átkötővezetéket. 
Ezután következnek az ellenállások, dió¬ 
dák, kondenzátorok, LED-ck. A 7806 
fektetve kerül a panelre és egy M3-as csa¬ 
varral erősítjük hozzá, mert ez a kontak¬ 
tus biztosítja a programot felvevő magnó 
földpontját. Hűtőzászlót is helyezhetünk a 
tok alá, de a tapasztalat szerint erre nincs 
szükség. 

Az összeszerelt áramkört még egy¬ 
szer figyelmesen ellenőrizzük, különös 
tekintettel a diódák, kondenzátorok pola¬ 


ritására. Ha hibátlannak találtuk, csatla¬ 
koztassuk a táprész bemenetét csengőre- 
duktor 8 V-os kapcsaira. Mérjük meg a fe¬ 
szültséget a 7806 kimenetén és a D,, katód- 
ján. Ha minden rendben van, a piros LED 
világít. Egy huzaldarabbal a READ bc- 
menetet földeljük le, ekkor a piros LED 
kialszik, a zöld kigyullad. Most már csak 
két magnó kell, hogy másolni tudjunk. 
Azt a magnót, amelyikről a programot 
másoljuk, csatlakoztassuk a READ jelű 
csatlakozására, amelyiken pedig rögzíte¬ 
ni szeretnénk, a WRITE jelűre. A két Da- 
tassette-et célszerű mindig egyszerre elin¬ 
dítani. 

Figyelem! A gyorsmásolót építőknek 
segít a szerző HOBBI ELEKTRONIKA 
üzletének szolgáltatása, ahol a működő 
mintadarab megtekintése után vásárolhat 
panelt, IC-t, egységcsomagot, készter¬ 
méket. CÍM: Bp. VII. Dózsa György u. 
16. T.: 122-8892. Részletes árajánlat a 2. 
oldalon található hirdetésben olvasható. 


Rését védelem 
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A lista elindítása után nem lehet többé resetel kiváltani. A 
helyett a tárolóban álló program újraindítása történik. Ha ezt a 
trükköt egy autostarttal együtt használjuk, hatékony komplex vé¬ 
delmet adhatunk programjainknak. 


Rt:ti 4444444444444 * 4:4 4 444444 
RÉM 4 4 

RÉM 4 RÉSÉT VEDELEM 4 

RÉM 4 4 

RÉM 44444444444444444444444 
FÜR T =53000 TO 53063 :RERD R : D=D + fi : PQKE T,R * NEXT 
I.F 0-07352 THEM PRIWHIBR R DRTR-SOROKBRN" : ENO 
SYS 53000 


DRTR 162 . 5 , 189 / 15 / 253 / 1 . 37 , 3 / 128 , 202 / 208 / 247 , 169 , 41,141 
DRTR 0 , 128 , 141 , 2 , 128 , 169 , 207 , 141 , 1 , 128 , 141 , 3 , 128,169 
DRTR 52 , 141 , 20 , 3 , 96 , 32 , 163 , 253 , 32 , 83 , 228 , 32 , 91,255 
DRTR 88 , 169 , 82 , 141 , 119 , 2 , 169 , 213 , 141 , 128 , 2 , 169 , 13,141 
DHTR 121 , 2 , 169 , 3 , 133 , 198 , 188 , 2 , 160,0 
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GEO(S) 


TIPPEK - TRÜKKÖK 111 

logikus dolgok 


Billentyűzetfunciók 
Geofile esetén 

Ha a Geofile nevű GEOS-alkalmazásnál kereső űrlapot ké¬ 
szítünk, eltűnik a menüsor, és ott jelenik meg a „Defining 
Search Form” (kereső űrlap definiálása) felirat. Ennek alapján 
azt hinnénk, hogy a menüsorból többé semmi sem hívható elő. 
Ez azonban nincs egészen így, az alábbi billentyűkombinációk 
még használhatók: 

(CBM X) Clear Text (szöveg törlése) 

(CBM V) Recover Text (szöveg visszaállítása) 

(CBM L) Show indicator (indikátor jelzése) 

(CBM Z) Geos 1.3-nál vagy 

(CBM Y) Geos 2.0-nál Clear Form (űrlap törlése) 

Az összes többi funkció a keresési maszkban nem érhető el. 

Geospell 128 
— nehézségek nélkül 

A Geospell program a kezelés során egy kissé makacs, külö¬ 
nösen új szavak felvétele esetén. Ekkor a következőképpen kell 
eljárni. 

A szükséges adatállomány (szótár és dokument) megnyitása 
után a Geospell számolja a szavakat, és alfabetikusán rendezi 
őket. Ez a folyamat azonban kb. 580 szó után abbamarad. Ekkor 
a beolvasott és rendezett szavakat a beépített szótárral összeha¬ 
sonlítja a gép. Azokat, amiket nem talál a szótárban, átírja egy 
pufferbe. A puffér pontosan 256 szó befogadására alkalmas. 
Amikor megtelt, jelzi ezt a tényt. Ekkor ezt a 256 szót összeha¬ 
sonlítja a személyes szótárral. Ily módon csökken az ismeretlen 
szavak száma. Csak most lehet a helyesírási hibákat javítani, 
vagy újabb szavakat felvenni. 

A Geospell tehát kétszer képes telt puffért jelezni. Ezért a 
Geospellnél a lekérdezésnél max. két oldalt lehet beállítani, 
mert különben megtörténhet, hogy az ismeretlen szavak listája 
nem lesz teljes. Ezt azonban a Geospell nem veszi figyelembe. 

irásvédelem Geos alatt 


A Geos 1.3 verziója óta három különféle lemezfajtát ismer. 

1. Rendszerlemez. Ezen olyan adatállományok vannak, 
amelyek csak bonyolult fogásokkal hagyják magukat törölni. 
Geos alatt sem másolni, sem formatálni nem lehet. 

2. Főlemez. Ennek megvan minden védelme, ami a rend¬ 
szerlemeznek, de másolni lehet. 

3. Felhasználói lemez. Ennek semmiféle védelme nincs sem 
a másolás, sem a fbrmatálás ellen. 

Mit is jelent ez a felhasználó számára? 


Ha Geowrite vagy Geopaint alatt valamilyen dokumentu¬ 
mot készítünk, ennek először semmilyen védelme nincs. A szá¬ 
mítógépről kiadott utasítással is egyszerűen törölhető. Nem 
mindenki veszi magának a fáradságot, hogy minden adatállo¬ 
mány esetén bekapcsolja az írásvédelmet. Jobb, ha a lemezt főle¬ 
mezzé alakítjuk. Ehhez a következő utasításokat kell beadni: 
OPEN l,8,15:OPEN 3,8,3,"#": 

RÉM lemezegység csatornáinak nyitása 
PRINT#1,# "U1 3 0 18 0": 

RÉM szektor beolvasása a pufferbe 
PRINT#3, "B-P 3 189": 

RÉM puffermulató beállítása 
PRINT#3," CHR$(80): 

RÉM főlemez érték beírása 
PRINT#3, "U2 3 0 18 0": 

RÉM szektor visszaírása 
CLOSE 3: CLOSE 1: 

RÉM csatornák zárása 

Ha a változtatást vissza akarjuk csinálni, akkor a hátulról 
számítva harmadik utsítást így változtassa meg: 

PRINT#3, CHR$(0) 

Ezzel a főlemez ismét normál lemezzé változik. Ha a mág¬ 
neslemezt a Geos alatt akarjuk védeni, az előbbi utasítást így kell 
kiadni: 

PRINT#3, CHR$(66) 

Vigyázat 

a Geofile alkalmazásánál! 

Adatfeldolgozásnál hamar előfordul, hogy az adatállomány 
túl nagyra nő, és áttekinthetetlenné válik. Ilyen esetben „felha¬ 
sítjuk” az adatállományt, és két kisebbet csinálunk belőle. Ez 
a Geofile esetében is működik. A menüpontokkal állományokat 
lehet másolni, és az eredeti adatokat megkétszerezni. Utána a 
már nem szükséges adatokat a kereső űrlappal és a Clear Form¬ 
ulái egyszerűen lehet törölni. A Delete-tel most törölni lehet az 
adatmezőket. Az adatállomány most már úgy van kiszabva, aho¬ 
gyan ön kívánta. Ha azonban most tovább akar dolgozni, gyorsan 
megállapíthatja, hogy többé nem tud adatokat kerestetni. Ez a 
hiba akkor lép fel, ha több tényező összejátszik. 

1. A kereső űrlappal adatokat kerestetett és azokat törölte. 

2. A kereső űrlapot nem törölte. 

3. Egy adatmezőt törölt. 

Ha most a kereső űrlapban erre az adatmezőre vonatkozóan 
még lenne egy tétel, ezt a Geofile nem találná meg. Ezért tehát 
vegye figyelembe, hogy egy adatmező törlése előtt a kereső űr¬ 
lap teljesen törlődik. 
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Mini dominó 


A játék ismertetése 

Ez a játék a közismert DOMINÓ játék egyszerűsített vál¬ 
tozata. 

Az egyszerűsítések: 

1. A köveket csak egy kijelölt pályára lehet lerakni. 

2. Csak egy irányba lehet haladni. 

3. A legmagasabb értékű kő a 6-6-os. 

Tehát összesen 28 db kő van. 

4. A kövek értékét a pontoknak megfelelő számjegyek 
jelzik. 

A játékot az kezdi, akihez a 6 6-os kő került. Ezzel kötele¬ 
ző kezdeni. 

A kezdő a 6-6 os követ leteszi a kijelölt pálya első 
helyére. 

A második keres egy olyan követ, amelynek egyik fele 
6-os és leteszi a második helyre. 

Ha nincs ilyen köve kihagyja a lépést. 

Így rakják le felváltva a köveket, amelyeknek egyik olda¬ 
lának azonosnak kell lenniük a már a pályán levő utolsó 
számmal. 

Ha egyik fél sem tud tenni vége a játéknak. 

Az nyer, akinek a végén kevesebb köve maradt. 

A játékban max. 14 lépéspár lehet. Ebben az esetben 
mindkét játékosnak elfogytak a kövei és az eredmény dön 
tetlen. 

Stratégia 

Azonos a normál dominó játék stratégiájával. 

A játék szerencsejáték jellegű, mert a nyerési esély 
nagymértékben függ a leosztástól. 

Miután minden szám 8-szor szerepel, a saját köveinket 
átnézve kiszámítható, hogy egy-egy számból hány db. van 
az ellenfélnél. Ez a már lerakott kövekből is számítható. 

Tehát ajánlatos a legnagyobb darabszámban meglevő 
kövekből lerakni, így az ellenfelet (miután nála ugyanebből 
kevesebb van) lépéskihagyásra kényszeríteni. Ügyelni kell 
arra, hogy az ellenfél lépéskihagyása esetén, legyen még 
ugyanolyan számú kő, hogy a sort folytatni lehessen. 

Ajánlatos az úgynevezett dupla (két azonos számú) kö¬ 
vektől minnél előbb megszabadulni. 


A program ismertetése 

A játékos a számítógép ellen játszik. 

A játék a billentyűzetről vezérelhető. 

A program egy címképpel jelentkezik be. 

Kérdést tesz fel a magyarázatra. (I)gen (N)em választ 
vár. 

Igen esetében egy rövid ismertetésre lép. 

Ezután ill. nem esetében a kövek összekeverése kő 
vetkezik. 

A gép összekeveri a 28 követ és kettéosztja. 

A keverés kb. 20 25 mp-ig tart. A kövek keverését a 
képernyőn és hangjelzéssel is kijelzi. 

Ezután kérdést tesz fel a gondolkozási idő hosszára. 

3 — 23 közötti szám beütését + RETURN-t vár. A be¬ 
ütött szám az egyes lépések előtt megengedett gondolkozási 
idő lesz kb. mp-ben. 


PÁLYÁZAT 

Következik a tényleges játék képernyője. Ez vízszintesen 
három részre osztódik. 

1. Kommunikációs rész. Itt jelennek meg az üzenetek, a 
lépésre felhívás, a kiválasztott kő jele. Kijelzi az idő 
múlását számmal és egy csökkenő hosszúságú vonal¬ 
lal. Kiírja a gép birtokában levő kövek számát. 

2. A játék pályája ahova a kövek lerakhatok. 

3. A játékos birtokában levő kövek kijelzése. Innen lehet 
választani. Lépés után a letett kő törlődik. 

A játékot az kezdi akihez a 6-6 jelzésű kő kerül. Indulás¬ 
kor, ha a gép kapta, akkor azt azonnal leteszi és eggyel csök¬ 
kenti a köveinek számát. 

Ezután vagy ha nincs nála a 6-6-os, rákérdez a játékos 
lépésére. 

Ekkor indul a gondolkozási idő mérése. 

A kérdésre a játékos beüti a letenni szándékozó kő szá¬ 
mait. Elsőnek mindig azt a számot kell beütni, amelyik azo¬ 
nos a pályán levő utolsó számmal. 

Ha a játékosnak nincs letehető köve a (**) jelet kell 
beütni. 

Ha a gondolkozási idő letelte előtt a játékos nem üti be 
a két számot, hangjelzés és kiírás után a gép következik 
lépésre. 

A gép ellenőrzi: 

1. Ha van 6-6-os köve, azzal kezd-e. 

2. Van-e olyan köve amilyet beütött. 

3. Ha **-ot ütött be, akkor valóban 
nincs letehető köve. 

4. A leteendő kő valamelyik száma 
megegyezik-e a lent levő utolsó 
számmal. 

5. A játék befejező lépését. 

Hibás lépést a gép nem fogad el. A hibát kiírással és hanggal 
jelzi. 

Ha a beadás megfelelő, elvégzi a lépést, törli a letett kö¬ 
vet és a gép lépése következik. 

A gép kiírja a lépését és azt, hogy még hány köve van. 
Ha nem tud tenni, azt hanggal és kiírással jelzi. Majd újra a 
játékos lép. Ha egyik játékos sem tud tenni vagy elfogytak 
a kövek vége a játéknak. 

A gép kiírja az eredményt és rákérdez újabb játékra. 
Igen esetében újra indul a kövek keverésével. 

Nem esetében összegezi az eddigi játékok eredményeit, 
ezeket kiírja majd elköszön. 


A program szerkezete: 

10 törlés, színbeállítás 

15 — 27 DIM, string állandók, értékadás 

30 — 32 SÍD inicializálás 

40 — 44 keverési grafika 

50 hívja címkép rutint 3000 címkép 

55 ha kéri, hívja az ismertet. 2000 ismertetés 

58 100-as sorra ugrik 

60 törlő subrutin 

70 DATA adatok, a pálya pozíciói 

80 — 85-90 hang effektek 
100 a kövek keverése 

170 a kövek szétosztása 

230 gondolkodási idő adatbekérés 

246 CR értékadás, szükség esetén itt lehet az idő 

számlálást pontosítani 


ilis 28 






& 

260 a játékmező kirajzolása 

430 a játékos köveinek, kiírása 

480 kezdőlépés irányítása 

530 befejező lépés figyelése lép a 1600 sorra 

535 FELHÍVÁS a lépésre 

540 GET rutin, gondolkozási idő kijelzés 

550 a lépés adatainak beírása 

577 idő lejárt lép az 1300 sorra 

580 A LÉPÉS ELLENŐRZÉSE 

640 — 650 A kő megfordítása 

670 HIBA kijelzés 

720 a játékos lépése, kiírás POKE-okkal 

830 a letett kő törlése 

860 A GÉP LÉPÉSE 

920 a kő kiválasztása 


PÁLYÁZ AT 


960 a gép nem tud tenni 

1000 a lépés elvégzése, kiírás POKE-okkal 

1080 a gép köveinek kijelzése 

1200 a ** beütés ellenőrzése 

1300 időtúllépés kijelzés 

1600 BEFEJEZÉS 

eredmény kiírás 
1660 új játékra kérdezés 

1680 újra indít 

1700 AZ EDDIGI EREDMÉNYEK 

1730 VÉGE a programnak ELKÖSZÖN END 

2000 MAGYARÁZAT szubrutin 

3000 CÍM KÉP szubrutin 

Harna M. András 
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1 RÉM **s***i<!Hmii*#*i*!«******3****i«íi*i«*i«imil«Hí 


2 RÉM ;* * 

3 RÉM * MINI OOMÍNO * 

4 RÉM * * 

5 RÉM * C==> 64 * 


6 RÉM * Hf-IENR M PtHDERS * 

7 RÉM * SZEGED 1. 992 * 

8 RÉM í+í*:+'*'*^***:*»*^**#*í«**^^W*W****'« 

9 ' 

10 PR I NT "" • P0KE53288, .13 < PÜKE53281 ,13 
15 oi m m <:28> / fii<zs >, c*<:28 ;<, z <;28> 

25 KR*-"nSt K R R M P U S 2 O f V STT 

27 QT== "8001.0203040506Ili213141516222324252633343536444546555666“ 

38 8=54272 > P ŰR I =8X08+24 < PORÉ 1,8 •• NEMI 
32 PQKE54296,15 = P0KE54277,24 
34 POKE 54284,26 = V=5427G = HB===S+1 
40 K1 T== “ t—i—.KSÜS8IBMII1I + 14 1 WMHK0S4M <— 1 — 1 71X1“ 

42 K2*«“ «—i Kunit ♦ t :*;bms«s t—♦ i w*ww =■ pttt 1 

44 K3#«“ '»«««**« mmni xmumnsi **tm»»wt nuiai xnxr 

58 GOSUB 3800 1 GOSUB 88 

55 GETGT= IF6*-""THEN55 

56 IF GT= M Í," THEH 80SUB 2880 = 00X0 108 

57 IF 0*0"N" XMEH 55 

58 60X0 108 

68 PRÍ.MX" WKM 71 KRKWKKi 

62 FÓR X=1 XO 12.88 = NEXT 
64 RETUR.H 

78 0BTR43,51,53,55,57,59,61,63,65,67,69, 71, 73,75,77,79,81 ,.83,85, 165,245,243 

71 0RXR241,239,237,235,233,23 1 ,229,227,225,223,221,219,217,215,2 1 3,211,291 

72 DRXR371,373,375,377,379,381,383,385,887,389,391,393,335,397,399,481,483 
88 POKE 8, 152 = POKE ,HB ,18 = POKE V , 128 • POKE V , 129 = RÉTIJÉN 

85 POKE 8+7,0 = POKE HB+7,2’PÜKE V+7,128 = POKE V+7,129 '• RÉT URH 

98 POKE 8,195=POKE HB,16=POKE.8+7,135=POKE HB+7,33=P0K£ V,32=POKE V,33 

91 POKE V+7,32 = POKE V+7,33 = RE'TURH 

188 PR INT KR.sk" 

181 PR I NT " Rt SEC <. 21 > " _« 

102 PR.INT 11 a KIS TÜRELMET! w KEVEREM fi KÖVEKET." >RR*8 

103 > 

109 FORT* 1T028 = PR 1 NT " " K1 % " " !C2# 

110 X== l NT < ENDCl>*28 > +1 

in M K3*“n “K3* 

112 P=0 = FOR.K=1TOJ-1 

114 IFX=Z<K>THENP==1 = K«=J-1 

116 NEXTK 

117 PEINT“ SMBlKIBtBlBIBI "K2T" "K1 T«G0S0B88 
120 ÍFP=1THEH118 

122 

124 HEXTJ 

138 F0RJ=28T01STEP-1 
132 N=2< J>= M=N-1= ü=N+M 
134 RT <: J > =M I DT < O*, 0,2 > 

136 HEXT J 

170 8=8 = FOR.fi* 1T028 ‘BT <ft >“““> CT <. fi> =====. 

188 I Ffi/2= INT í fi/2 > THENCT < fi/2 > ==RT <'. fi > = 00X0288 
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o 

o 

190 

200 

210 

220 

230 

o 

234 

235 
240 

0 

244 

246 

o 

250 

260 

265 

o o 

270 

275 

280 

285 

290 

o 

o 

295 

300 

310 

320 

330 

o 

340 

350 

360 

o 

370 

380 

o 

398 

400 

410 

o 

420 

430 

o 

440 

450 

470 

o 

480 

498 

o 

508 

518 

520 

o 

530 

535 

o 

536 

537 
540 

o 

o 

550 

555 

556 

557 
560 

o 

o 

565 

578 
575 
577 

579 

o 

588 

598 

688 

o 

o 

618 

620 

630 

646 

650 

o 

o 

660 

670 

675 

680 

690 

o 

710 

720 

730 


e=e +1 > e# <: b > -r* < n > 

fi*<fi>=""*HEXTfi 

FORR*1TO14 1 Cl*«MX0*<C*<fi>,1,1> >C2*-M10#CC*<fi> , 2, 1> 
C*<ft>»" i—r— l M««HWU‘ , +Cl*+ u I "+C2Í + " OMMIIttHI 1 — 1 —'TT1" 
NEXTfi 

PR IHT “ BWWlhWlKtW" SPC C18 > " . 

PR.XHT" MENNYI GONDOLKODÁSI 100 LEGYEN ?W 
INPUT" 3 - 23 MP. ";S* 

S»VRLÍS*> < IF S<3 OR S>23 THEN 240 
CR»16>S»<S+1>*CR 

C*=" KttfflMMÍlKI m" 

S0=14-BD=14 
PR INT KJ?.* 

2=26 

PRINTTRBC2> "71-% “ 

PR. INTTBB C2 > “ t NEKEM—VflN t 11 
PRINTTfiBCZJ"l 14 KÖVEM I" 

PRINTTfiBCZ>“ •'- 

FQRR-1T039 1 PR INT"..." ; > NEXTfi > PR INT 

PR I NT " 73 —i—i— t— r—*—í—r —t—- v—r—i—i—r— r —r * i 

F0Rfi=lT01S“ PRINT" 1 > NEXTfi 1 PRINT" S" 

PR I NT " *— 1 — 1 —'—'— ‘ — ‘ —»—'—■J—l— 4—i.k —'—‘—'—i .! 

PR I NTTRB< 36 >I I" 

PR I NT “ i—r— r— t-t-t—t 1 —t—r-~r—r--T~r-T—t—r—P—I 

PRINT“ "; >FORR*1TO13>PRINT"! “;>NEXTfi■PRINT“I“ 

PR I NT “ l—h—‘—*— L — 1 — 1 — 1 — 1 — L —'——* — -J — •—* 

PRINT" I t" 

PR INT" í—1 i 1 ( r- i—i—t—i r—i—í r—<—i—r—i 

PRINT" I"; >FORR®1T017■PRINT" I ", <NEXTfi >PRINT 

PR INT " 1 —'—'— 1 — L —‘— 1 — 1 — 1 — 11 —'■ <—— J — i Ki" 

F0RR-IT039 1 PR INT "»«“ ; • NEXTfi > PR INT 

PR INT" " ; •• FORR* 1 TÓ? > PR INTC * < fi > ; > NEXTfi > PR I HT " WW' 

PR INT" « ; FQRfi-ITO? < PRINTC*<fi+? > i ■ NEXTfi 
QOSUB 98 


C-14 • 8=14 KI* 1256 > 00=55528 

B*»"6“<F0RH-1T014> Ct*-MIO#<C*<R> ,13,1><C2**MIO*íC*<fi>,15,1> 

IFC 1*» "6"RNDC2sr~"6"THEN 530 

IF Bírt fi >="66“ THEN BÓ*»" 14" > OOTO860 

HEXTfi 

IFfifi«28ORSO»0THENSD*0■80-5•GOTO1600 
GOSUBG0'PRINT"WHM MIT TESZ LE ? M" 

Z=Ö = H-S 

FÓR 1 = 1 TO 8/CR•PRINT"♦"; > NEXT 

FÓR fi—1 TO 2 

GETfi*■H—H—1<HH=INT<H/CR> 

PRINT“«BW»fl"TfiB<22>HH; 1 PR INT "9* " 

PR I NT “ SWÖffiSW" TfiBv HH > " » 

IF H—6 THEN R—2 1 R# <1> = "*" = fi*<2> — "" : Z.1 ! GOTO 575 

IF fi*-"" THEN 550 
IF R«1 THEN fl*<2>-"" 

PRINT" TTTTl" l R#<R>—fi# 1 PRINTTfiBC16>R*<1>;" ";A#<2> 

NEXT fi;H“8 ! PRINT 

IF ZO0 THEN 1300 

POKE 1167,32'POKE 1168,32 

IFfi*C1 > = "*"fiNOR#C2 >-"#"THEN1280 

lFfiSC<fi*< 1 > ><480RfiSCÍR*<; 1 > > >55THENGOSUB60 = G08UB85 • GOTO530 
IFRSC<fi*<2>><480RfiSC<fi*<2 »>55THENGOSUB60*00T0538 
FORR— 1 TO14 « Ct*»MI0*ÍC#OFO ,-13, 1 > ; C2#=MID*<C#<R> , 15, 1 > 
IFfifi>0THEN640 

IFA *(. 1. >0 "6"ORfi*C2>O "6" THEH67Ö 

IF fi#d>»Cl* AND fi#<2>-C2* RND Cl*-B* THEN 728 

IF fi*<I>—C2* RND fi*<2>—Cl* RNO C2*=B* THEN 778 

NEXTfi 

G0S0B68 

GOŐUB 85-GOSÜB 68 -PR INT" 73 HELYTELEN BEfiDfimi. IMS lü" 

FORR—lT02000•NEXT *OÖTO530 
GOSUB60■GOTO530 

t 

fifi—fifi+1 •• RER0H1, H2 

POKE K-t-H 1, RSC<C1 #> > POKE K+H2, RSC <C2*> = POKE. C0+H1,0 ' POKE CO+H2,0 


O 

O 

O 

O 

O 

O 

O 

O 

o 

o 

o 

o 

o 

o 

ü 

o 

o 

o 

o 

o 

o 

o 

o 

G 

o 

o 

o 

o 


30 













PÁLYÁZAT 



o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


740 C*<fl>=C# ’ B$™C 2 * 

750 QOSUB 8 Ö'GOTO >310 ' 

760 > 

770 RR«RR+ X ’ REROH 1 - H 2 

780 POKE K-M-ll, RSCCCZ#/ --POKE K.+H 2 ,RSC<C 1 *> ’POKE C 0 +H 1 , Ö POKE CQ+H 2 -, © 

798 C# < R > =C ST- = BíT =C 1 * 

800 GOSUB 80 
818 SO»SO- 1 <UU =0 
828 PR X HT " Í»«(Í 8 S 8 S 0 ^^ 

838 PRIMT" " i ’ F 0 RR™ 1 T 07 > PRINTC*<A> i > NEMTA > PR .(.H'f'SIS 

840 PR INT" " ; ’ F 0 RR« 1 TG 7 • PRINTC* <A +7 > • NEXTR 

858 GOTO 900 

860 RR.RR+ 1 ■ REROH 1 , H 2 

870 POKE K+Hl / 54+128 ■ POKE K.+H 2 , 54+128 * POKE C 0 +H 1,4 • POKE C 0 +H 2/4 
888 8 sr:r> = "**" 

890 B*«" 6 “ • BD™BD.X < GOTO 1090 

988 I FAA™ 28 OR 8 D« 0 THENSO »5 • B 0--8 = GOTO X 688 
910 OOSUB 60 > PR INT " 5 WSÜM EN TESZEM ! 

92 © FORR* 1 TOX 4 <et#“MI 0 *< 8 *<R> , 1 X > ■ e 2 f=fUOf<e*<;R) / 2 / X > 

9:38 IFB*»B 1 *THEN 1000 
948 IFB$=B 2 #THEN 104 B 
950 NEXT’GOSUB 60 

960 PRINT" 9 BWB EH NEM TUDOK TENNI ! “ 

978 GOSUB 85 <FORT™X TO 900 >NEXT 
980 IF UU »1 THEN 1600 
990 ülj™ 1 •• G 0 T 053 © 

X 000 AR”»RR+ 1 :REROH 1 ,H 2 

10 X 0 POKE K+H 1 / RSC <B 1 * > + 128 ‘ POKE K+H 2 > RSC <B 2 * > + 12.8 > POKE CO+H 1 / 4 > POKE C 0 +H 2,4 
1020 6 #<R>™"**" >BB*=B 1 $+" “+B 2 $ 

1030 6 *™B 2 *•GOTO 1080 
1040 RR™RR+ 1 •REROHX,H 2 

1050 POKE K+Hl i RSC<B 2*>+128 1 POKE K+H 2 , RSC <B 1*>+128 > POKE CO+H 1 , 4 -POKE CO+H 2/4 
1068 B*CR :• »"##“' 6 B*« 82 *+ " " +B 1 $'■ 

1070 BT- 8 XT 

1080 PRINTSE#■BOHBO -1 

1890 BD$»STR»<BO> 

11 Ö 0 IF LEN<BD *><3 THEN 80 #=" “+BD#’GOTO 1100 
1110 PR INT " SWSWB 58 I" SPC < 27 > BO*“«" > GOSUB 80 
1120 FÓR T-l TO 900 ’NEXT 
1130 GOTO 530 
1195 ’ 

1200 F 0 RR- 1 T 014 < C 1 SF=MID*<C*<A> , 13,1 C 2 #*>MI 0 *<C#<ft> , 15 , 1 > 

1210 IFC 1 #=BiP 0 RC 2 #"-B#tHEN 1230 
1220 NEXT>GOTO 125 © 

1230 GOSUB 85 ’GOSUB 60 1 PR. INT" 71 VRN HU" LETENNI Hl" 

1248 FORR™ 1 TO 2000 ’NEXT’GOTO 530 
1250 IF UU =1 THEN 1600 
1260 60 X 0900 

1308 GOSUB 85 ' GOSUB 60 >PRINT"XI I O O'.THLW I 
1302 FÓR T*t TO 1200 •NEXT 

1305 PRIMT “'.l mt Jfl " ’POKE'l 167 , 32 ’ POKEl 168,32 

1310 IF RR =0 THEN GOTO 960 
1320 RR=RR— 1 =GOTO 910 
1500 ’ 

1600 RÉM BEFEJEZES 

1638 IF SO>BO THEN PRINT"WWW EN NYERTEM I "’WV™WV-H 

1640 IF SOCBD THEN FRINT"WWW BRRVO I NYERT >. " ’WN«MN+l 

165 © IF 80=60 THEN PRINT"WWW DÖNTETLEN >. ">WD»MD +1 

1660 GOSUB 90 ’PRINT"W MEGEGVSZER ? I / N " 

167 © GETG#•IF .. THEN 1678 

1688 IF G*»“I M THEN RESTORE * W«W+ 1 ’GOTO 100 

1685 IF G$ 0 "N" THEN 1678 

1698 W“M +1 

1780 PRINT KR*"XW" 

1710 PR INT" VOLT “W" JRrai. MTSZMR. “ 

1714 PRINT"» ~ 

1715 PRINT" EBBŐL NYERT’ “MN"" VESZTETT > "WV 

1719 PRINT"W 

1720 PRINT" DÖNTETLEN VOLT’ "NO 

1738 PRINT " WWW . " SPC < 18 > " . 

1735 PRINT" MÁSKOR IS SZÍVESEN JÁTSZOM ÖNNEL *" 

1748 PRINT"WWW"SPC< 16 V . .“ 
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1745 PR INT" VI S20NTLRTRSRR JS" O 

1750 END 


O 

o 

o 

o 

o 

o 
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1770 RÉM —.—------ 

20ÖO PR INT KR.sf 

2809 PRINT" _"SPC<15>"_ . ." 

2010 PRINT"H KÖVEKET EGV KIJELÖLT PRLYRN KELL LE-" 

2014 PRINT“ ."SPC C28 >"." 

2015 PR I NT *' RRKN1 ÚGY/ HQGV RNNRK VRLRMELYIK SZRMR" 
2.019 PRINTTftö<26>". 

202.0 PR INT"MEGEGYEZZEN R SQRBRN UTOLSO HELVEN LEVŐ" 

2024 PRINT" 

2025 PRINT"SZRMMRL. " 

2029 PR1NTTRBÍ 16 > “... 

2030 PRINT"HR NINCS ILVEN KÖVE/ ÜSSÖN BE 

2034 PRINTTP®< Vd> “."8PC<17>“. - 

2035 PRINT"Hfi EGYIK FEL SEM TUD TENNI VEGE R JRTE-" 

2039 PRt NT 

2040 PRINT"NRK. 

2044 PRINTTRB <26 > 

2.045 PR INT "ftil NYER/ RKINEK KEVESEBB KÖVE MRRROT !" 
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2049 

2050 

2054 

2055 

2209 

2210 
3000 
3010 
3012 
3014 
3016 
301.8 
3020 
3022 
3024 
3026 
3030 
3032 
3038 
3040 


PRINT" 

PR INT" JO SZORHKQZflST LSI" 

PRINT" 

PRINT" TOVRBB BRRMELVIK 60MBBRL I" 

GET G$ ! IF G*=““ THEN 22ÖÖ 
RETURN 

PR INT KRí ’ PRINT-i PR INT 
PR INT" í"\ .'"i -r "f 

PRINT" MII t III I 

PR INT" 1 I ! 1 M I 

PRINT" - 1 - x - L -*■ 

PR INT 

PRINT" _"SPC<15>". ." 

PRINT“ EGYSZERUSITETT ÜOMíNO-JRTEK" 

PRINT" 

PRINT" H SZRM1 TÓGÉP ELLENWSISi" 

PRINT" R PROGRRMOT IRTF t ■ HFÍRNR N RNÖRf<'*l. «3" 

PRIHTTRBC26>"SZEGED 1392" 

PR INT “KIM . . . • /• -v 

PRINT" KÉRI R J'RTEKSZRBRLVOKRT ? 11! .' ÍN!" 


”s —\ r\ rí 

II Iliit 
II II 1 


t n -r —■> 

I Ilit I 
I I ’-l I I 
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3042 PR í. NTTRB < 23 > " 1 

o 3050 GGSUB 30 1 FORT” 1 T06Ö »NEXT 

32.08 RETURN 



Megathelló 


Pályázatom címe: Megathelló, eza M EGA és az OTH EL¬ 
LŐ szó összevonásával született. A játék egy címképernyővel 
indul, majd kérésre megjelennek a szabályok. Utána a gép 
megkérdezi, hogy erősen játszom-e. Kezdőknek érdeme¬ 
sebb az ,,N" billentyűt megnyomni. A gyengébb fokozatban 
én 10 játszmából 8-at megnyerek. Ezután a program még 
megkérdezi, hogy a fehérek vagy feketék szeretnénk-e lenni 
és szeretnénk-e kezdeni. Célszerűbb, ha mi kezdünk. 

A játék egy 8 x 8-as táblán játszódik. Alapállásban a táb¬ 
la közepén a gép és a játékos két-két bábuja található. A tábla 


oszlopai betűkkel (a, b, c, d, e, f, g, h), a sorok számokkal 
(1,2,3,4,5,6,7,81 vannak jelölve. Lépéseinket az oszlop és a 
sor koordinátáival adjuk meg (pl. G8 vagy 8G). A 9-es leütés 
hibát okoz. A játék célja az ellenfél mezőinek elfoglalása. Egy 
mezőt úgy tudunk elfoglalni, hogy körbezárjuk. Fontos, 
hogy ez átlósan is érvényes. A gép csak azt a lépést engedi, 
amellyel foglalunk valamit az ellenség mezőiből. Annyi me¬ 
zőt foglalunk el, ahányat közrefogunk. A játék végén az győz, 
akinek több mezője van. A játéknak akkor van vége, ha a táb¬ 
la betelik vagy valamelyik játékosnak elfogy az összes mező¬ 
je. Ekkor kiadódik az értékelés. Előszóra számítógép jellemzi 
a játék színvonalát (ez általában tarolós szokott lenni), majd 
kiírja a mi és a gép mezőinek számát. Figyelem! Ha a gép el¬ 
foglalja az összes mezőnket, akkor a gép mezőinek száma 64, 
a mienk pedig 0 (ez fordítva is igaz). 
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Az általam használt stratégiák 

Itt csak ötleteket tudok adni. Én általában igyekszem 
megakadályozni az ellenség ránk veszélyes lépéseit. Például, 
ha van 5 mezőm, melyeknek egyik oldalán van az ellenség¬ 
nek mezője, akkor a gép biztos, hogy a sor másik végére fog 
lépni, s így elfoglalja 5 mezőnket. Ezért célszerű levenni az 


ellenfél figuráját (mezőjét), így megakadályozva tervét. Igye¬ 
kezzünk teljes sorokat (8 mező egymás mellett) kialakítani. 
Ez áltósan is érvényes! így több lépési lehetőségünk lesz, és 
eme sorokat az ellenfél (a számítógép) is csak nehezen tudja 
elfoglalni. 

Továbbra is maradok olvasójuk: 

Fapál Ferenc 
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1 

2 

3 

4 

s 

6 

7 

8 

9 

10 
12 

13 

14 
16 

17 

18 

19 

20 
22 
2.4 
26 
30 

32 

33 

34 

36 

37 

38 

39 

40 
42 
44 
46 

48 

49 

50 

51 
54 
56 
58 
200 
202 
204 
206 
208 
218 
212 

214 

215 

216 
218 
220 
222 
224 
226 
230 
240 
242 
250 
252 
256 
258 
260 


i 


hkh. % 


rém #mm****mmmm**wmx*w****m 
RÉM * * 

RÉM * C= OJ8RG PRLYRZRT SSZ. * * 

RÉM * * 

RÉM * C=64 -MEORTHELLQ- C=64 * 

RÉM * * 

RÉM * IR.TR> FRPRL FERENC 1992. * 

RÉM * * 

RÉM ***!«(i<(i*!**Nt!»!#itSS<í**í«i***!**!«i*#***í«**** 

GOT0915 

CL-53280 POKECL, 1 > £*= " " > B=~ 1 > M= 

C 04 ="» e »«»*## g iMutati r t írhmms h wmu* e immniii l &«!*.« i_ mmmd" 

e*»e*+ •• i«*MWMw«NKKaaKna««Mx«*«K«ttHattna&«8««Naat ,> > sa*ö > 84=8 < ss-e > pokecl+ 

04-" 

OI MR C 9 , 9 > , 14 < 7 >, J 4 < 7 > , 04 C 2 > 

D4CM+l>“"«iaa« üsai" >N4CM+l> = "a VÍLRGOS S" 

04<:b+ 1 >*" Hant bcsii" > n*<b+ t >--“ a Sütet > o*< 0+1 >*“ " > GOTO 2.00 

FOR.L-0TO9 < GETX-4 > MEXT 

QETX4.XFX-T-O.THEHRETURH 

PR INT" a HM" ; > FORL--1TÜ100 > NEXT 

PR. X NT " H" ; = FOtf.L- 1 TO1 80 > NEXT > G0T022 

P0KECL+1,3 1 POKECL'*© , 3 '• PRXHT " «W»!»Wr!!WHÍ ,, TRB<'.36> } CO* 

PR T. NT " MX t -v ■FRPRLf* < ----- “ 

PR INT" MEZŐID ST;H1;"1IB " >-PRINTTRB<21 > ; "fi MEZŐIM S" ;'C1;"HB " 

PRINT“ar»l I MM'-'■*-!sOHM«*«ll JBORMESW MR'--'tTMI 

X4= " S t--t- 1 --+-f- 1 -- 1 - 1 --r 

PR. INT "na R B C 0 E F G H 

PR X NT " K .-.-1->-*-r- t -r—1H 1 ’ 






1 

1 / 1 


F0RI-1T08 < PRINTI "Sül " ; > P0EJ=lTQ8 > PRINT04<R< X , J > + l > "Ml M" 
PR INT > IFI 08THENPRINTX4 

PRINT< NEXTI > PR 1 NT"S L .-*- i --*-*--- 1 *- L 

I.=-l > J=I 

F0RK-1T02<G0SÜB28>G»R8C<X4> 

IF47<0RNÓtX58THENX=0-4Ö > PRINT"a "X*“ * " ; 

I FE4O3FtND0'C74THENJ=G~64 > PR INT “ öt "X*“ « " i 
NEXT>RETUEN 
NEXT >RETUEN 


>NEXTJ 


>RETURN 


■ X4>=ö4 f. c+ 1 ;« 


MSÍSSSMMWÍ®' 
>GO8OB20 


* MEGtTT HELLO * 


> F 


0 


PRINTLEFT4<;04 , 2*< X3-1 > +6> i 8PC <4*< J3-1 > +5> 

F0R.K.= 1T09 > PRINTX4“M" ; > F0R.L~1T02©8 ' NEXT 
PR. X NT " #8 Mi" ; «F0R.L= 1TO200«NEXTL > NEXTK ■ RETURN 

PR I NT " -r- -r-MWWMWI 

PRINT“'JSÖ9MISMERTE8SEM R SZRBRLYOKRT <I/N> 7 "i 
IFX4~"N" THENPRINT" St NEM " 'G0T021Ö 

IFX»«“I"THENPRINT"a IGEN «8“ «FORTO-1TO1Ö00>OOSUB80O> 

IFXSPO " I " THEN200 

PRINT"M JO FORMRMBRN JRTSZRK <I/N> ? "; 

G0SUB2© * IPX**"N" THENPR.INT " a NEM " > GOY0215 
PR INT" S IGEN " < 82=2 > 84=1 > 85—2 
FOP.P=. T04 < RER0L*<P> > NEXT 
FORK«0TO7 '• RER0I4<K> / J4<K> > NEXT 

FÓR I =0T09 = FORJ=8T09 > H < X , J > =ö > NEXT.1,1= R < 4,4 > =W . fi < 5,5 > =W > R C 4,5 > =B > R < 5,4 > »B 

C1-2 >Hl«C 1 > NI =4 '• Z“8 = C-W > H=8 

PRINT"MS 8. BOTÉT VRGV á V BILRGOS LESZEL? 

0080820 > IFX4-"8" THENPRINTN*<0) ■ FORTO* 1 TO1.000 > NEXT • G0T0238 
PRINTN4<2>>FORT0=1TG1008«NEXT >C=B > H«W 

PR INT "3“} >0080830 »PR.XNT04"W RKRR8Z KEZDENI ? “ ; 

0080820>IFX4="X"THENPRINT"S IGEN ">G0T0388 
PRINT"8 NEM “<PRINT" OK, GONDOLKODOM <" 

B1=-1>13=0 *J3=8 > Tl=C> T2=H 


FÓRI = 1T08 <FOR J = 1T08 >IFfl<I. 

GOSUB448 

IFF1=0THEN286 

0=-1> 00808450 


•J > O0THEN286 
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262 I FF 1=0TH£H286 
264 U=-ldFSl=©THEN286 
266 IFÍ 1=1>ORí 1 =8>THEHS1 =S 1+S2 
268 I. F í J = 1 >OR < J =8 > THENS1=S1+82 
278 IF <. 1 =2 :• OR CI =7 > THEHS 1 =S 1+S5 
272 IF C J=2 > OR í J =7 :• THEHS 1=81 +85 
274 IF<I=3>0RíI=6 > THEHS1=81+84 
276 IF< J=3 > OR < J =6>THEHS1=81+84 
278 IFS1 -CB 1THEN236 r ; i /. 

280 IFS1>B1THEH284 

282 X FRHD < 1> >9.5THEN286 

284 Bl=Sl>13=1•J3-J 

286 HEXTJ,X <IFBO0THEM308 

238 IFS5=0THEN294 

292 85=0 >G0T0250 

294 PRINTDí"»»"£*"» ELPRSSZOLOM fi LEPESEMET5S".IFZ-1THEN354 

298 2=1■G0T0308 

380 2=0 '• PR.IHTDT" W "ET"«LEPESEM a "RIGHTTCSTRTÍ I3> - 1 > " <S üt "CHR#<J3+64> 

382 GOSUB54■1=13■J=J3>U=1>G0SUB458»C1=C1+81+1 = Hl=H1-SX■H1=H1+1 

384 PRXHTD#"MSI"EX-" ■ MEGSZEREZTEM SÍ; " MEZŐDET3" <GOSUB30 

306 IFH1 =ÖOR.Hl “64THEN354 

308 T1=H•T2=C 

310 PRIHTOT" M"EX" LEPESEO --*•- "; •60SUB44 ■ 

312 IF d <0>OR CJ C0> THENS18 
314 IFI O0THEN326 

316 PRIMTÜX-“»"EX-" BIZTOS, HOGY NEM AKARSZ LEPNI ? 

318 GO8UB20' XFXX-O" I "THEHPRIHT" a NEM "*G0T0318 

320 PRIHT" Üt IGEN " ■ 1F'Z= 1THEH354 

324 2=1-GOTO250 

326 ÍF fid, J>=8THEM330 

328 PR.IHTÜX“>M“EX-“ - Ft MEZŐ FOGLALT ** PRÓBÁLD ÚJRA" ‘GQTO340 
330 GOSUB440 = í. FF 1 = 1THEM334 

332 PRXMTO*“W»“E#“ NEM JO LÉPÉS ** PRÓBÁLD UJRfi"'G0T0348 

334 U=-l>6O8UB450d FS 1>8THEN344 

338 PRIHTDsr"BÖfl“E«-" ILLEGÁLIS LÉPÉS ** PRÓBÁLD ÚJRA” 

340 OOTO310 

344 2=0-PR.IM"rDt“tSRt“ET“ MEGSZEREZTED ",Sl;“ MEZŐMET" ■ 0=1 =GOSÜB450 

348 H1=H 1+81 + 1 - Cl =c 1-S1 ■ H1 =N 1 +1 GOSUB38 
350 1FC1 =80R.H 1 =64 T HEN354 
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352 GOTO250 

354 PRIHTD* ; E* • PRIHTEX- > PRIMTE* 

358 XFHl =C 1THEHPRIHTOT;EX-“lTW?M>,tSttRl'RWKtRt ****** DÖNTETLEN ! ! ! ******" - 00X0400 

362 IFH1>C1THEH368 

364 PRIHTDX- í EX" CMJSÜSÖflíflWítOítKt ****** NYERTEM m ******•■-. GOTO370 

368 PR. I HTDX; EX : " ITBBSDSOSWlSKlIitÖÍ! ****** NYERTÉL \ t \ ******“ 

378 Cl=C1-Hld FC1>.THEN376 
372 C1=-C1 

376 P=. ••Cl=C64*Ci:*/Hl dFCXCl 1THEHP=4 
378 IFC1-C25THEMP-3 
380 I FC 1-C39THEHP=2 
382 IFCl<53THENP=i 

384 PRINT"» EZ EGY “iLXíPV* JÁTSZMA VOLT! 

385 PRXNT"WRZ EH BIRTOKOMBfiH" i 64-H1í"MEZŐ, fi TE MEZŐID" 

386 PRIHT" SZAMA";Hl;"VOLT. M" 

40O PRIHT" JÁTSZOL MEG EGYSZER d/H> ? "; 

482 OOSUB20 > IFX*=" I" THEHPR.ÍMT" S IGEN “ =0010218 

406 PRIHT";r.l«WRWmWWRtW»WKt KOSZOMON fi JÁTÉKOT ! “ = FORTD=1TO4000 = NEXT 

408 PRIHT : HEH 

440 F1=0-FÓR11=~iTO1■FÓRJ1=- X TOX 
442 FÓR11 =--1 TO 1 = FÓRJ1 =--1 TO 1 
444 X FA <1+11,J+Jt>=T2THEN448 
446 HEXTJ'X , 1.1 > RETURM 
448 F1=1iRETURH 
450 S1=8•F0RK-8TQ7 

454 15=1400 • J5=J4<lO = 16=1+15 • J6-J+J5 > S3«8 ■ IFfi< 16,J6 >OT2THEN472 

458 S3=S3+1 i 16=16+15 = J6=J6+.J5 ■ IFAd 6, J'6 }.T1THEH466 

462 IFfi<I6,J6>=8 THEH472 
464 G0TQ458 

466 S1-S1+S3* I FUO1THEH472 

470 16=1 • J6=J < F0RK.1 “8T0S3 « Rí 16, J6>“Tl = 16=16+15 > J6=J6+J5 < MEXTK.l 
472 HEXTK>RETURH 

800 PRIHT" 11t9>»HIHHIH>t»»i|———.WiatltWIllliMMilHIIIMMMgiata * MEGfiTHELLO * SWM" 


O 

O 

O 

O 
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o 

o 
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& 


o 


o 


o 


o 


Q 


O 


O 


o 


o 


862 

864 

806 

807 

808 
81.0 
812 

813 

814 
816 
818 

819 

820 
822 
900 


PRINT" & IHTEK EQV 8X8-0S TR.BLRN JÁTSZÓDIK. VfiLTRKOZ"; 

PRINfVfi JELÖLÜNK MEG 1-1 MEZŐT- CSRK OLVRN MEZŐT JELÖLHETSZ 
PR IRT "MEG/ RMELV RLTRL fiZ EH SZÍNEMET.. VFlÖV 'SZÍNEIMET KOZREZR—"; 

PRINT" RQO. HR EGV/ “; 

PR INT "VRGV TÖBB MEZŐT KÖZREFOG RZELLENFEL UJ LEPESEVEL, AKKOR fi KQZEPSOK" 
PR INT" RTSZINÉZŐDNEK fi SZÉLSŐK SZÍNEIVEL.“ 

PRINT"» ÖFI©VELEMII!« 


PRINT" 

PR INT 
PRÍRT" 

PR. INT" 

PRINT" 

PRINT" 

R.ETURN 

ŐRT Pl" TÖKÉLETES 


RZ IMÉNT ELMONDOTTAK RTLOSRN IS 


HR NEM TUDOD, HOÖV HOVfi LEPJ, RK.KŰR 

írd be rz 'a r s a © m -t» m 

fi JÁTÉKHOZ JO SZORRKOZRST KIVRN R SZER- 
FRPRL GRMES!“ 


ERVEHYESEK! 


20 PRPRL FERENC ALIAS* 


1 TRROLOS","KÜZDELMES","SZUPER","KÍMÉLETLEN" 



901 

DRTfi 0, 

1,-1 

’i / 1 / ki / 1 / 

1,0, 

-1, í, -1, i 

0,1, 1 

o 

915 

1=1 -m- 

^aBaöSEsríCicaasíBKi" 

>PRINT“nSW" : P0KE53281,1 > POK.E53280, 1 


920 

r ti. 1 t i i L.c.r i •v'-.M-v / 3L / .111 » 


\ / 

■1 / A / A 


925 

PRINT" 

1 3 

sít i a 


«i i a 

bi ia «i“ 

0 

930 

PRINT" 

i a 

Bi i a 


—11 a 

bi ia “i“ 


935 

PRINT“ 

i a 

bi a «i a bi 

i a 

bi i a 

*»r-4 I a BI a BI" 

o 

94© 

PRINT" 

i a 

Bt a bi a bi 

i a 

s-.~-i i a 

bi a bi i a bi a b 

95© 

PRINT" 

i a 

Bt a bi a bi 

i a 

sst i a 

bú a bi a fii" 



PRINI" 


’ 




0 

96© 

PRINT‘PRINT 






962 

PRÍH"r"»»WB<l_II I _ 


i i 

t " 

0 

963 

PRINT" 


i t t i 


i i 

r.i " 

964 

PRINT“ 


« « _j 

i i 

i i " 


965 

PRINT" 


, | , r 


i t 

i i ■■ 

o 

966 

PR INT" 


.i _i i 

_l 

_1_i 

- R 41 


97© 

PR INT 







974 

978 

979 
98© 
985 
987 
1000 


PRINT"ftW»***»*»IF , R.O0RRMOZTR tt FRPRL FERENC" 

PRINT"S»*»**»*»*IGRRFIKA • FRPRL FERENC" 
PRINT"i»******#**»TLET • FRPRL FERENC" 

PRINT “ 8»»»»»»«W»«»W|r.ESZULT BOG. 26. - " 

PR INT "li.JII|iW#W«lil*Wl*WW»»D»ÍSZEF'T. 6. - IG. “ 

PR INT "■*«<. C > F Pl P Ft L F E R E N C 1 9 9 2 . 
GETYt- • IFV*»" “THENPRINT"W" > I-I-<l<t5>+13#<I»14> 


GOTO920 


1010 GOTO12 
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Játékleírás 

ESZKÖZÖK: egy 8x8 mezős tábla és 64 korong, ame¬ 
lyeknek egyik oldala világos, a másik sötét. 

Alapállásban a tábla közepén 2 világos és 2 sötét korong 

van. 

A játék célja az ellenfél minél több korongját átfordítani 
a játék végéig. 

MENETMÓD: az első lépés joga a világosé. A játékos 
egy korongot tehet fel a táblára a saját színével felfelé. A ko 
rangot csak olyan üres mezőre teheti, amelytől oldal- vagy 
átlós irányban az ellenfél folyamatos korongsorát követően 
saját korongja van. 

Ha a játékos elhelyezte korongját, akkor az ellenfelének 
összes olyan korongját átfordítja, amelyek a legutóbb elhe¬ 


lyezett korongjától kezdődően oldal- vagy átlós irányban he¬ 
lyezkednek el, folyamatos sort alkotnak és a sort követően 
a játékos saját korongja van. Ezután a lépés joga az ellenfélé. 

A játéknak vége, ha: 

(1) az egyik játékos az ellenfél összes korongját átfor¬ 
dította. 

(2) betelt a 8x8-as tábla. 

(3) a lépés jogával rendelkező játékosnak nincs lépési le¬ 
hetősége. 

A játékban az a győztes, akinek a játék végén több ko¬ 
rongja van fent a táblán. 

Az általam követett stratégia 

Az összes lehetséges hely számbavétele után úgy vá¬ 
lasztom ki a megfelelőt, hogy a lehető legkedvezőbb helyek 
közül az legyen, ahol az ellenfél legtöbb korongját tudom át¬ 
fordítani. 

A tábla tájait aszerint osztályoztam, hogy az oda elhe¬ 
lyezett korong a későbbiek során mennyire lesz „átfordítha- 
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tó”. Eszerint a legelőnyösebbek a tábla sarkai (1). Ezt követik a 
tábla széleinek középső részei (2), majd a tábla belső mezői (3). 
Ezek voltak az előnyös pozíciók. A következők a legtöbb esetben 
hátrányosak, tehát ide csak akkor helyezem a korongot, ha az 
előzőkbe nem lehetséges. Ilyen helyek a tábla szélétől beljebb 
eső (4), valamint a tábla sarkaitól 1 egységre lévők (5 és 6). (A 
szántok a mellékelt ábrára hivatkoznak.) 

A stratégia helyességét bizonyítja, hogy a gép önmaga ellen 
közel döntetlent ért el. (6 pont különbség) 


Programleírás 

Az előkészítés: (102-170. sorok) 
a 102 — 116. sorok a grafikát töltik a tárba, 
a 120—122. sorok a táblakoordinátákat prioritási sorrendben 
töltik az X(5,15); Y(5,15) tömbökbe. 

A képernyő és a tábla előkészítése a 174 — 208. sorokban 
történik. A tábla a T(7,7) tömbben található. 

A játékos lépését a 212-246. sorok értékelik ki: 
a 212-232. sorok a mozgatást ill. a funkciókat kezelik, 
a 240—246. sorok a játékos lépésének helyességét el¬ 
lenőrzik. 

A számítógép lépésének kiszámítása a 250—294. sorok 
feladata: 

a 252. sor megtudja, hogy taktikailag melyik lépés lenne a 
legjobb; 

ezt követik a 254-268. sorok, amik megnézik, hogy ez a lé¬ 
pés az 1, 2 vagy 3. prioritású helyeken van-e. Ha nem, akkor 
ugyanezeken a helyeken taktikailag kevésbé előnyös lépési 
lehetőségeket keres. 

Ha egyetlen ilyen hely sem volt, akkor a 270—280. sorok 
folytatják a vizsgálatot ugyanilyen rendszerrel, de a 4. és 5. 
prioritású helyeken. 

Ha ezeken sem talál lépési lehetőséget, akkor ,,nyúl" a 
6. prioritású helyekhez, és megkeresi a lépés helyét. 
(282-284. sorok) 


a 286—292. sorok elhelyezik a kiválasztott helyre a korongot, 
a 294. sorban megvizsgálja, hogy betelt-e a tábia, 

— ha nem akkor újra a játékos lép, 

— ha igen, akkora kiértékelés és az eredményhirdetés követ¬ 
kezik. (298-312. sorok) 

A korong elhelyezésének szubrutinját a 316 332. sorok 
alkotják. 

A rutin az X, Y koordinátájú, T(X,Y) színű korongot teszi a 
táblára. 

A lépés helyességét a 336-372. sorok vizsgálják. 

A vizsgált hely koordinátái: X, Y; a korong színe: T(X,Y). 
A rutintól hibajelzésként VI =1-et kapunk. 

A 376—400. sorok végzik a korong elhelyezése utáni át¬ 
fordításokat az X, Y koordinátájú és T(X,Y) színű korongra 
értelmezve. 

A404 — 428. sorok a tábla minden pontjára megvizsgál¬ 
ják, hogy egy CO színű korongot oda elhelyezve hány nem 
CO színű korong fordítható át, majd visszatérő értékként 
átadják a HH(7,7) tömbben az eredményeket, illetve az LH 
változóban a legnagyobb értéket, vagyis a taktikailag legjobb 
lépést. 

A program használata: 

— A kijelölés a JOYSTICK-kal (2-es PORT) történik. 

A tűzgombbal választjuk ki az aktuális pontot a lépés 
helyéül. 

— Az Fl-et megnyomva újra kezdhetjük a játékot. 

— Az F3-mal ellenőrizhetjük, hogy van-e még lépési lehető¬ 
ségünk. Ha nincs, akkor automatikusan az eredményki¬ 
hirdetés következik. 

- Az F5-tel „átpártolhatunk" a másik színhez. Ekkor az ed¬ 
digi színünkkel lesz a számítógép, így tehát a lépés joga 
az övé lesz. 

— Az F7-tel léphetünk ki a játékból. 

Kellemes szórakozást kíván a játékhoz: 

Décsi Tamás 


O 


O 


o 



100 

o 

102 


104 

o 

106 

108 


110 

o 

112 


114 

Q 

116 

118 


120 

o 

122 

124 


126 

o 

128 


138 

o 

132 

134 


136 

o 

138 


140 

o 

142 

144 


1 POKE 750/ 
704+X¥3+1/1• 


255 

NEXT 





90 RÉM ***************** 

92 RÉM * R E VERS I * 

94 RÉM * .CC>1992. * 

96 R.EM * QEC8X TRMRS * 

98 RÉM ***************** 

RÉM -EL0KES2ITES- 
FOR J>0 TO 63=POKE ?0<*+1,0 = NEXT X 
POKE 704/255:FOKÉ 705/255‘FOKÉ 749, 

FÓR 1 = 1 TO 14 = POKE 784+1*3,128‘POKE 
POKE 56334,0‘POKE 1,51 

FÓR K—0 TO 511‘POKE 14336+K,PEEKt53248+K>‘NEXT K 
POKE 1,55 *POKE 56334,1 

FÓR I =8 TO 127 ‘ RERD fi • POKE 14848+ I, Fi ‘ NEXT I 

V—53248 ’ POKE 2840, 11 = POKE V+39,3 ‘ POKE V+28,8 > POKE V+29,0 > POKE V-> 23,0 
ÓIM T<7,7>, X R17 > , HH < 7,7 > , X < 5, S.5 > , V<5, X5> 

FÓR 1=0 TO 5 = FÓR K.-0 TO 15 
REFtO X< X , K > , V t X , K > ‘ NEXT K, I 
RÉM -GRftFIKft- 

ORTft 255,128,131,143/153/159/191,191 
DfiTfi 255, 1,193,241/ 249,249* 253,253 
OftTft 191,191,159, 159, 143, 131, .128,255 
ÜFlTFt 253,253,249,249,241,193,1,255 
OftTft 255, 128, 128, 128, 12.8, 128, 128, 128 
OftTft 255/1/1/1/t/l,1,1 

OftTft 128,128, 128,128,128, 128,1.28,255 
ŐRTfi 1,1,1,1,1,1,1,255 
OftTft 25,25,25,25,25,25,25,25 
OftTft 152,152,152,152,152,152,152,152 


t 


o 

o 

o 

o 

o 

o 

o 

ü 

o 

o 

o 
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O 


o 

146 


148 

o 

158 

152 


154 

o 

156 


158 

o 

160 


162 


164 

o 

166 


168 

o 

17’0 

172 


174 

o 

176 


178 

o 

180 

182 


184 

o 

186 


188 

o 

190 

192 


194 

0 

196 


198 

o 

200 

m 

o 

286 

208 


2 . 1.8 

o 

212 


214 

0 

2l6 

218 


228 

o 

222 


224 

o 

226 

228 


238 

0 

232 


234 

o 

236 

238 


248 

o 

242. 


244 

o 

246 

248 


250 

o 

252 


254 


256 

o 

258 


268 

o 

262 

264 


266 

o 

268 


270 

o 

272 

274 


3.76 

o 

278 


288 

o 

282 

284 


286 

o 

288 


298 

o 

292 

294 


ORTR 255,0,0,255,255,0,0,8 
ORTfl 0,6,0,255,255,0,0,255 
BflTfl 0,0,0,31,31,24,24,25 
ORTfl 0,0,0,248,248,24,24,152 . 

ORTfl 25,24,24,31,31,0, 0,8- 
ORTfl 152,24,24,248,248,8,8,8 
RÉM -POZICIOK- 

OflTfi 8,8,0,7,7,8,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
ORTR 0,2,0,3,0,4,0,5,7,2,7,3,7,4,7,5,2,0,3,8,4,0,5,0,2,7,3,7,4,7,5,7 
ORTfl 2,2,2,3,2,4,2,5,5,2,5,3,5,4,5,5,3,2,4,2,3,5,4,5,8,0,8,8,0,0,0,0 
ORTfl 1,2, 1,3, 1,4, 1,5,6,2,6,3,6,4,6,5,2, 1,3, 1,4, 1. ,5, 1,2,6,3,6,4,6,5,6 
ORTR 1,1,1,6,6,1,6,6,0,8,0,8,8,8,8,0,8,0,8,0,0,0,Ű,0,0,0,0,0,0,0,0,0 
ORTfl 1,0,0,1,6,0,0,6, 6,7,7,6, 1,7,7, 1,0,8,'0,8,0,0, 8,0,0,8, Ö, 0,0,0,0, 0 
RÉM -KÉPERNYŐ— 

PR INT “ SRI" +CHR* <. 8 ?+CHR* 142? > PORÉ V+24,31 
POKE V+32, 14‘ PORÉ V+33, 1.4 • PORÉ 646,6 

PR INT v' i RÉM CSHIFT+L'J C ISSHIFT+KI CSHXF V+M3 

FÓR 1=8 TO 7 

PR INT " \—”—-—." -RÉM CSH+H K 8 C SH+Ú 3 CSH+E 3 31SH+1 3 

PRINT " l-l -I -l -I -t -I -I -I : MEXI. t ■ RÉM CSH+H 3 C8CSH+F3 CSH+Ö3 3 CSH+1 3 
PR INT ■' ’T“" i RÉM CSH+H 3 C 16SH+J 3 CSH+0 3 

PR INT “WJSBÍKT, , " R E V E R S I " 

PRINT ,,"WWF1 - UJ JRTER“ 

PR INT , , "WF3 -- ELLENŐRZÉS" 

PR INT ,,“WFS - SZIHCSERE" 

PRINT ,,"WF7 - KILÉPÉS" 

PORÉ V+21,1'POKE V+16,0 
POR X=8 TO 7'FÜR Y=8 TO 7 

T<;x, v >=0 

íf X--3 OR X=4 TMEM T<X,Y>=.<Y-3>.2*<Y=4> 

OOSUB 316 = MEXT V'NEXT X 
WN=2 ' BN=2 > C1 = 1 ■ C2---2 
RÉM —R JÁTÉKOS LÉPÉSÉ- 
X=3>V»3 

GET R ' R=PEEK <56328 > 

Y*Y~<<R AMD l)-0)#<Y>0>+<<ft RNO 2>“0>*KY<:?> 

X=X-< <:R RNO 4>«0>*<X>8) + <<fl RNO 8> =0 ;<*< X<75> 

POKE V,32+X*16>POKE V+1,66+V*16 
1F Cfl RNO 16> =8 THEM 240 
IF fl*=CHR*<133> THEH 174 - 
IF RT=CHRÍ<134> THEH 234 - 

IF Rsf=CHR$t.l35> THEN CÜ=C1 •• C 1=02 >-C2=C0 ' GOTO 248 
IF R*=CHRÍC136> THEN PR INT "Cl" 'POKE V+24,21>ENO 
GOTO 214 

UZ= 1 ■■ oosue 432 '• CO=C 1 

GOSÜB 404=UZ=3'OOSUB 432 : IF LH=0 THEH 238 
X-'XX ' V--VY • GOTO 214 
IF T<X,Y>O0 THEH 214 
TCX,V>=C1'UZ«1 1 OOSUB 432 

GOSÜB 336' IF Vl-1 THEN T < X, V=8 ' UZ=3 • OOSUB 432' GOTO 214 

OOSUB 316'OOSUB 376 

RÉM —Fi GÉP LEPESE- 

UZ-2■OOSUB 432>00=02 

OOSUB 404=IF LH=0 THEN 238 

HH=LH 

V1-0'FÓR 1=0 TO 3’IF HHCX<0,i),YC0,!>>=HH THEN LX»X<0,I>'LV=Y<8,I>=VI=1 
NEXT I •> IF VI«1 THEN 286 

VI--0 ' FÓR 1=0 TO 15 ' IF HH<X< 1, I > , Y< 1, I > >»HH THEN LX=X< 1, 1> ' LY»Y< I, I > ' Vi»t 
NEXT I ' IF Vt*»l THEN 286 

VI. =8 ' FÓR 1=0 TO 11 ■■ IF HHCX<2, I > , V'.2, l > ;<»HH THEN LX=X<2, 1 > ' LY»Y<2, I > ' VI = 1 
NEXT l'IF VI=1 THEN 286 
HH=HH—1 '• IF HH>0 THEN 256 
HH=LH 

V 1=0'FÓR 1=8 TO 15'lf HHCX<3, 1 > , YO, 1>=HH THEN I..X=X<3, I > ■ LY=VO, I > ' V 1 = 1 
NEXT I'IF VI=1 THEH 286 

VI =0 FOR I =0 TO 3 ' IF 1tt-KX4, 1 > , Y<4, I > > =HH THEN LX=X<4 , I > ' LV=V<4, I> ' VI = 1 
NEXI I'IF VI=I THEN 286 

HH=HH—1•IF HH>0 THEH 272 

FÓR 1=0 TO 7'IF HH<X<5,1> »Y<5,1> >»LH THEN LX=X<5,1>=LV=YC5,I > 

NEXT I 
X=LX‘Y=LY 
’f <X,Y?=C2 

OOSUB 336‘OOSUB 316‘OOSUB 376 

V=VV‘X=XX'UZ=3■OOSUB 432 

IF BN+WN-C64 RNO MN>0 RNO BN>0 THEN 214 
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Cr 


o 

296 


298 

o 

300 


302 

o 

304 


306 


308 

o 

310 


313. 

o 

314 


316 


318 

o 

320 

322 

o 

324 

326 


328 

o 

330 


332 

o 

334 

336 


338 

o 

340 


342 


344 

o 

346 


348 

o 

350 


352 


354 

o 

356 


358 

o 

360 

362 


364 

o 

366 


368 

o 

370 

372. 


374 

o 

376 


378 

o 

380 

382 


384 

o 

386 


388 

o 

390 

392 


394 

o 

396 


398 

0 

400 

402 


4Ü4 

o 

406 


408 

o 

410 

412 


414 

o 

416 


418 


42,0 

o 

422 


424 

o 

426 


428 


430 

o 

432 


434 


436 


438 


440 


RÉM —KIERTEKELES— 

print •• vege « jrteknrk*" -primt "*r, 

IF MM>BN THEH PR.INT "Pl FEHEP. NYERT" , 

IF WN'CBN TMEN PR.INT "R FEKETE NYERT" ; 

IF WN=BN THEN PR INT "EGYENLŐ PONTSZFIM " ‘ GOTO 308 
PR INT ftES<IWN-"BN> ; " PÜNTTriL' " 

GET PÚIM IF R*="" THEH 308 
IP H*=CHR*< 133> THEH 1 74 
EMU 

RÉM -KORONG. 

IF T<X/V> =9 THEN 332 

C0= CTO!,V) = l > • POKE 646/CO = PR INT "isi" , 

FÓR 1=0 TO V 
PRINT "MM"; 

NEXT I 

PRINT TRB<X#2+1 > ; “ -*W*IKI!l ■ RÉM CSH+* I CSH+fi J COOWN3C2LEFT KSH+B 1 CSH+C3 
IF CQ»0 THEH BN«BN+l 
IF 00= l l'HEN WN-MN+1 
RETURN 

RÉM -ELLENŐRZÉS- 
Vl=Ö'K=3 —TCXj Y> 

FÓR ll=0 TO ?■ IRCII>=0<HO«0 
IF V-O RNO <11=0 OR 11=1 OR II*?> THEN H0*1 

IF Y»7 RNO Cl 1=3 OR 11=4 OR Il*5> THEN H0»1 

IF X=0 RNO <11=5 OR 11=6 OR II=7> THEN H0=1 

IF X=? RNO <11=1 OR 11=2 OR Il«3> THEN H0=1 

IF HO=J. THEH 362 

1N=<II=5>+<I i =6>+<II=7>-<lI=1>-<11=2>.<II»3> 

I V= < 11 =0 >+<11 = l > + < 11 =7 > - < 11 =3 >.<. 11 =4 > - < I I =5 > 

IF, T<X+1X*< IR:<11> +1 > ,Y+IY*<IR<I'!> + !> >OÍ< THEN 364 
IRC 11> = IR<II> + 1 
««=IR<Ii> + 1 

IF X+1X*0.O<“? RNO X+IX*0O>“@ RNO Y+IYMQ0O7 RNO V+IY : *0.Q>=0 THEN 354 
VI=VI +1•IR<11> =0■00TO 368 

IF TCX+IX*< IRC 11 >+ 1. ;•, V+ 1Y*< IRC 15. l > JOTCX.Y) THEN 362 
IF IRC 11>“© THEH 362 
HEXT II 
V1= INT C V I /S > 

RETURN 

RÉM —FlTFORO í TflS— 

ZX=X>ZY=V 

FÓR 11=0 TO 7 

IF IRC 1I>=8 THEN 39© 

IX* C 11 =5 :• < 11 =6 > + < í. i. = 7 > - < U.»1 > - < 11 =2 > - < 1.1 =3 > 

IV=< 11 =0>■+ < 11 = 1 >4< 11=7 >•-< 1.1=3'.' -< 11«4>-< 11=5} 

FÜR Cl.1 TO IRC 11> 

X=ZX+ í X*CI>Y»ZY+IV*CI 
IF TCX;Y)=1 THEN WN=WN-1 
IF T<X/Y>=2 THEN BN=BN—1 
T < X > V > =T < ZX / Z V > 

GOSUB 31.6 •• HEX T CI 
NEXT U. 

X»ZX<V»ZY 1 RETURN 

RÉM -KERESES- 

XM=X>YY=Y 

LH«0 1 LX-0 ' LS'»0 

POR X=Ö TO 7'FÜR Y®0 TO 7 

HH=8 

IF T<X/V>O0 THEN 424 
T < X t V>“CO 

GOSUB 336'IF VI»1 THEN 422 
FÓR I=0 TO 7 >HH«HH+IR< I> >NEX'I í. 

IF LH<HH THEN LH«HH 
T C X / V >=0 

HH C X/V> =HH 1 NEXT V 

PR INT " MMWMMMMMWKD^^ / - - “WW" ;X; “ " 1 NEXT X 

RETURN 

RÉM .ÜZENET— 

PRINT " WTOfflSOMKBS^ ,-/ ; 

ON UZ GOTO 436,438/440 
PR I NT "tkELLENORZOK. . 1 RETURN 

PRINT "^GONDOLKODOM...“;•RETURN 
PR INT " ";>RETURN 
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Tengeri csata 


A gép flottájával mérkőzhetsz meg a közismert Torpedó 
játék általam továbbfejlesztett változatában. 

A 12x12 mezős tengeri szektorban először te, majd a 
gép helyezi el a Torpedó szabályai szerint a 4—4 db 2-mezős 
hajót. A két hajóraj ugyanazon a területen van, nem külön- 
külön térségben. Felváltva lőttök és mozgathatjátok hajóito¬ 
kat egy hellyel arrébb (a mozgatás nem kötelező, beírásával 
elhagyható). 

A játék mutatja a csatamezőt, a hajóhíd helyzetét a hajó¬ 
híd kódjával. Kiírja a lövésed és a lépésed koordinátáit és me¬ 
zőtörléssel megjeleníti a csatamezőn. A gép lövését is kiírja 
és megjeleníti sötétkék színnel. Közli a lövések eredményét. 
A hajóroncsok helyét jelöli. 

A koordináták beadása előtt közölnöd kell a géppel, 
hogy melyik (pl. AF7) hajóra vonatkoznak (A, B, C, D). Lőni 
csak a hajó lőtávolságán belül lehet, ami körbe 2 mező. Az 
eltalált hajók eltalált része láthatóvá válik számodra (a te ha¬ 
jóid is „láthatóvá" válnak a gép számára, ha eltalálja őket). 
Eltalált hajórészről tüzelni nem lehet. 

Hajónk a négy fő irányba tud lépni. Eltalált hajó nem tud 
mozogni. Se lövéskor, se lépéskor ne adjál olyan koordinátát, 
ahol a te hajóid tartózkodnak, mert siralmas következményei 
lehetnek rád nézve. 

Ha egy ellenséges hajó közvetlen közelébe érsz és ütkö¬ 
zésveszély áll fenn, akkor azt a hajóradarod jelzi (az ellenség 
hajóradarja is jelzi!). 

Ha olyan koordinátára irányítjuk a hajónkat, ahol már 
tartózkodik másik hajó, ütközünk és mindketten elsül¬ 
lyedtek. Elsüllyedt hajók helyére ne menjünk. 

Ha lövésünk alatt, felett vagy mellett közvetlenül ellen 
séges hajó tartózkodik, akkora golyóban lévő radar jelez (az 
ellenségnek is van golyóradarja!). 

A radarjelzések helyét a táblán megjeleníti, a koordiná¬ 
táit kiírja a gép. A két radar különbözőképpen működik. A 
hajó radarja azt a pontot mutatja, ahol az ellenséges hajó tar¬ 
tózkodik, a golyóradar a becsapódás helyét mutatja, aminek 
közvetlen közeiében az ellenséges hajó van. 

A gép a lövéseket számolja. Az győz, aki elsüllyeszti az 
ellenség összes hajóját. Ha minden hajó sérült (egyik sem 
tud mozogni), akkor elképzelhető döntetlen állás. Ha ez áll 
fenn vagy fel akarjuk adni a játékot, akkor írjunk be @-t. A 
gép ilyenkor, vagy a játék végén kiértékeli a mérkőzést és ki¬ 
rajzolja az ellenség még megmaradt hajóinak helyzetét. 


Tengeri csata — programleírás 

10 Tömbdeklaráció és képernyőbeállítás. Ugrik 

játékszabályokhoz. 

410 — 430 Mezőbeállító szubrutin. 

Hívják: 625, 960, 983, 1010, 1060, 1070, 1150, 
1270, 1390. 

440 — 460 Golyó- és hajóradart, hajófelrakás- és lépésel¬ 

lenőrző szubrutin. 

Hívják: 752, 940, 1240, 1350, 4050. 

465-476 Játékszabály kiírás, 1. képernyő. 

Hívja a továbblépés rutint. 

477 — 483 Játékszabály kiírás, 2. képernyő. 

Hívja a továbblépés rutint. Ugrik táblarajzo¬ 
láshoz. 




512-514 

515-550 

560 

570 

580-625 

630-750 

752-754 


760 

770-800 
810-820 
840 - 870 
880-920 

930-970 


980-985 

990-1000 

1010 

1030-1070 


1080-1090 

1100-1110 

1120 


1125 

1130 

1135-1160 

1160-1170 

1185-1188 

1190-1200 

1210-1260 


1270-1280 

1280-1300 

1310-1330 

1340 

1350-1420 

1430 

1999-2207 


Továbblépés rutin. 

Táblarajzolás. 

Adatbeolvasás előkészítő. 

Lépésszámláló. 

Hajóradar. 

Hívja mezőbeállító rutint. 

Adatbeolvasás. 

Hajóradar szubrutin. 

Hívja hajó- és golyóradar ellenőrző szubrutint. 
Hívják: 590, 2005, 2010, 4020. 

Üzenettörlés. 

Adattranszformálás. 

Elágazások értékelésekhez. 

Lőtávolság ellenőrzés. 

Lövés értékelés szubrutin. 

Hívják: 2700. 

Golyóradar. 

Hívja golyó- és hajóradar ellenőrző rutint. 
Hívja mezőbeálló rutint. 

Lövés kijelzése. 

Hívja mezőbeálló rutint. 

Süllyedésvizsgálat. 

Találat kijelzés. 

Süllyedés végrehajtó szubrutin. 

Hívja süllyedéskijelző rutint. 

Hívják: 990, 1000, 1310, 1330 
Befejezés vizsgálat. 

Visszaágazások. 

Süllyedés kijelző szubrutin. 

Hívja mezőbeálló szubrutint. 

Hívják: 1060, 1070. 

Gép ép hajóinak keresése. 

Hívja ép hajórész kereső szubrutint. 
Döntetlen vizsgálat. 

Hívja ép hajó kereső szubrutint. 

A gép hajóinak helyzetét felfedő. 

Hívja mezőbeálló rutint. 

Játszma kiértékelése. 

Ép hajó kereső szubrutin. 

Hívják: 1130, 4000. 

Ép hajórész kereső szubrutin. 

Hívják: 1080, 1090, 1125. 

Lépésellenőrzés. 

Hívja lépés- és hajófelrakás ellenőrző rutint. 
Hívja rossz adat rutint. 

Lépés végrehajtás. 

Hívja a mezőbeálló rutint. 

Ütközésvizsgálat. 

Ütközés végrehajtása. 

Hívja süllyedés végrehajtó rutint. 

Hibás adatbeírás kijelző szubrutin. 

Hívják: 840, 1210. 

Hajók felrakása és ellenőrzése. 

Hívja: rossz adat rutint. 

Rossz adat rutin. 

Hívják: 1240, 1350, 1380. 

Lövésgenerátor. 

Hívja hajóradar szubrutint. 

Hívja hajórész és golyóradar mellégeneráló 
szubrutint. 

Hívja saját hajó összehasonlító szubrutint. 
Hívja képernyőleolvasó szubrutint. 

Hívja lőtávolban saját hajó kereső szubrutint. 
Hívja lőtávolba generáló rutint. 

39 " 
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2210-2225 

2700 

2750-2760 

2800-2810 

2900-2910 

4000-4220 


5000 - 5500 

5700-5730 
6440 - 6510 

6520-6590 

6610-6660 


A$ 


B$ 

C$ 

D$ ' 

E$ 

E% 

F% 

G 

H 

I, J 
K 

L 

M 

N 

0 

P 

Q 

R 

S 

T 

U 

V, Y, Z 


Lőtávolba generáló szubrutin. 

Hívják: 2165, 220r. 

Lövés dekódolás és végrehajtás. 

Hívja lövésértékelés szubrutint. 

Képernyő leolvasó szubrutin. 

Hívják: 2092, 2165. 

Lőtávolban saját hajó kereső szubrutin. 
Hívják: 2047, 2072, 2092, 2180, 4200. 

Saját hajó összehasonlító szubrutin. 

Hívják: 2045, 2060, 2090, 2169, 2205, 
Lépésgenerátor. 

Hívja ép hajó kereső szubrutint. 

Hívja hajóradar szubrutint. 

Hívja épség ellenőrző rutint. 

Hívja golyó- és hajóradar ellenőrző rutint. 
Lövésvégrehajtás. 

Hívja hajórész- és golyóradar mellégeneráló 
szubrutint. 

Ép hajókereső szubrutin. 

Hívják: 4030, 4060, 4100, 4210. 

Hajófelrakás generátor. 

Hívja hajórész mellégeneráló szubrutint. 
Hívja hajófelrakás ellenőrző szubrutint. 
Hajórész- és golyóradar mellégeneráló 
szubrutin. 

Hívják: 2045, 2060, 2080, 5110, 6490. 
Hajófelrakás ellenőrző szubrutin. 

Hívják: 1380, 6480. 


Változólista 

táblarajzolásnál számkarakterek tárja (lövés¬ 
generátornál, adatbeolvasásnál) — teljes 
adattároló 

táblarajzolásnál táblaelem (karakterbevitel 
tároló) 

táblarajzoJásnál táblaelem (hajófelrakásnál ha 
jónév betű) 

hajófelrakásnál hajórész számláló (lövésjelző 
szín) 

adatbekérő szó 

a mező x koordinátája, amivel műveletet 
végzünk 

a mező y koordinátája, amivel műveletet 

végzünk 

ideiglenes tároló 

lépésszámláló 

ciklusváltozók és ideiglenes tárolók 
adatbeviteli mód jelző (0 = hajófelrakás, 1 = 
lövés, 2 = lépés és a gép generátorai) 
golyóradar jelzője a gépnek 
golyóradar jelző 
hajóradar jelző 

utolsó golyóradarjel x koordinátája 
utolsó golyóradarjel y koordinátája 
játékos utolsó lövése x koordináta 
játékos utolsó lövése y koordináta 
utolsó lépés x koordinátája a játékosé 
utolsó lépés y koordinátája a játékosé 
a gép következő lépése ezzel a hajóval lesz 
eredményjelző, hibaszámláló, ideiglenes 
tároló 


E% (0) 

PÁLYÁZAT 

gép golyóradar x koordináta 

F % (0) 

gép golyóradar y koordináta 

E % (1 — 8) 

ha értéke kisebb 13-nál: játékos hajójának x 

F % (1 —8) 

koord. 

ha értéke kisebb 13-nál: játékos hajójának y 

E%(9 —16) 

koord. 

ha értéke kisebb 13-nál: gép hajójának x koor¬ 

F % (9 —16) 

dinátája 

ha értéke kisebb 13-nál: gép hajójának y koor- 

dinátája 

ha értéke F%(1-16)-nak > 12, de E%(1 —16) < 13, akkor 

sérült hajórész 

ha értéke E%(1 —16)-nak > 12, akkor elsüllyedt hajó 

E % (17) 

üres 

F% (17) 

üres 

E% (18) 

átmeneti tároló E%-nak 

F % (18) 

átmeneti tároló F%-nak. 


„Tengeri csata" — Lövésgenerátor 
működési elve 

2000 Írásszín és az utolsó lépés kiírásának törlése 

után megnézi, hogy volt-e a játékosnak ha¬ 
jóradar jele. Ha nem volt, akkor ugrik to¬ 
vább 2010. 

2005 Ha a hajóradar által jelzett hajórészt nem lőt¬ 

ték ki, akkor arra megnézzük a saját hajó ra¬ 
darját. Ha az jelez, akkor az lesz a lövés. Ugrik 
végrehajtásra. 

2010 Ha a játékos lépett, akkor azt a pontot hajóra¬ 

darral megvizsgáljuk. Ha van mellette hajónk, 
akkor a játékos utolsó lépése lesz a gép lövése. 
Ugrik végrehajtásra. 

2020 — 2040 Ha az ellenfélnek nincs eltalált hajója, akkor 
ugrik tovább 2090. 

2045 Az eltalált hajórész mellé generál egy pontot. 

Leellenőrzi, hogy állt-e ott ép hajónk. Ha állt, 
akkor visszaugrik a sor elejére. 

2047 Képernyőmemóriából kiolvassa, hogy ha az a 
pont nincs kilőve, akkor megvizsgálja, hogy 
van-e lőtávolban hajónk, ahonnan leadhatunk 
e pontra lövést. Ha van, akkor ugrik végre¬ 
hajtásra. 

2048 Ha nem jó ez a generált pont, akkor a próbál¬ 
kozások számát növeli és ha nem érte el a kriti¬ 
kus számot, akkor visszaugrik a lövés generá¬ 
lásához. 

2050 Ha előző lépésünkkor nem jelzett a golyórada¬ 
runk, akkor ugrik tovább 2150. 

2060 A golyóradarjelünk mellé generál egy pontot. 

Leellenőrzi, hogy ott áll-e ép hajónk.. Ha áll, 
akkor visszaugrik lövés generálni a ser elejére. 

2070 Ha egy véletlenszám kisebb 0, %-nél, akkor 

ugrik továbbgeneráláshoz 2078-ra. 

2072 Ugyanaz mint 2047 

2074 Ugyanaz mint 2048 

2080 A hajóradar mellé generált pont mellé generált 

egy pontot. Ha ez a pont megegyezik a golyó¬ 
radarunk jelével, akkor visszaugrik lövégésge- 
nerálásra a sor elejére. 

2090 Leellenőrzi, hogy áll-e ott ép hajónk. Ha áll, 

akkor visszaugrik lövésgenerálásra. 
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2092 

2094 

2096 


2150 

2165 


2170 

2190 

2200 

2205 

2206 


2207 

2210-2220 
2700 - 2720 

2750 - 2910 


Ugyanaz mint 2047. 

Ugyanaz mint 2048. 

Ha a második lövésgenerátor túllépte a siker¬ 
telen próbálkozások maximális számát, akkor 
visszaugrik az előbbi golyóradarjel mellégene¬ 
ráláshoz. 

Ha egy véletlenszám kisebb 0,5-nél, akkor ug¬ 
rik tovább 2200 

A játékos utolsó lövésének képzeletbeli lőtá- 
volságába generálunk egy lövést. Leellenőrzi, 
hogy ha áll ott ép hajónk, akkor visszaugrik a 
sor elejére. 

Ugyanaz mint 2047. 

Ugyanaz mint 2048. 

A hajóink közül kiválaszt egyet. 

A kiválasztott hajó lőtávolságában generál egy 
pontot. 

Képernyőmemóriából kiolvassa, hogy ha azon 
a ponton nincs eltalált hajó vagy roncs, akkor 
megvizsgálja, hogy nincs-e ott ép hajónk. Ha 
nincs, akkor ugrik lövés végrehajtásra. 
Visszaugrik hajókiválasztásra. 

Szubrutin 

Dekódolja és kiírja a gép lövését és elugrik a 
lövés kiértékeléséhez. 

Szubrutinok 


Lépésgenerátor működési elve 

4000 Ha nincs ép hajónk, akkor nem tudunk lépni, 

ugrik a nem lépésre. 

4010 Ha nem volt hajóradarjelünk, akkor ugrik to- 


4020 

4030 

4100 

4200-4210 


4220 

5000 

5100 

5110 

5120-5140 

5150 

5200 

5500 

5700-5730 


Hajóradar vizsgálat. Ha nem jelez, akkor ugrik 
tovább 2100. 

Megvizsgálja, hogy nincs-e eltalálva a hajónk. 
Ha nincs, akkor ugrik végrehajtásra. 

Ha meg van jelölve, hogy az előzőleg lépett 
hajónkkal újra lépni kell, akkor ellenőrzi, hogy 
nincs-e meglőve a hajónk. Ha nincs, akkor ug¬ 
rik lépésvégrehajtásra. 

Megvizsgálja, hogy a játékos lövésének kép¬ 
zeletbeli lőtávolságában van e hajónk. Ha 
van, akkor megvizsgálja, hogy nincs-e meg¬ 
lőve. Ha nincs, akkor ugrik végrehajtás¬ 
ra. 

Ugrik a nem lépésre. 

Letárolja annak a hajónak a kódját, amivel leg¬ 
közelebb lépni kell. 

A lépésre kiválasztott hajórész melletti hely¬ 
ben maradó hajórészt állapítja meg. 

A helyben maradó hajórész mellé generálja a 
lépés pontját. Ha ez egyezik a lépendő hajó¬ 
rész pontjával, akkor újrageneráláshoz vissza¬ 
ugrik a sor elejére. 

Ha a lépés helyén hajó vagy hajóroncs van és 
a próbálkozások száma nem érte el a kritikus 
számot, akkor visszaugrik a helyben maradó 
hajórész melletti generáláshoz. 

Ugrik nem lépésre. 

A lépést végrehajtja és visszatér a játékos lövé¬ 
sének beolvasásához. 

Nem lépünk, visszatér a játékos lövésének be¬ 
olvasásához. 

Szubrutin. 


vább 


4050. 


Szakály György 
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480 PR INT" Haiorai/M LEtTil/MPNI NEM TUD. fi SERUrSUMM, .MLT HHJOTíl, JS-HI REm. HBZRO" 

481 PR INT "TBI—WL LOT»»-.WNI NEM CEHET. Hfi HfiJQr*l, HMfik VfiGVM RONCSNAK METM, M3Z HE" 

482 PRINT"KI / ELSUTBl—MLL VÉDTÉK. Hfi GEDBI/ HftJGJfintsai, , HlVfiO VfiH UtTM.HTTKOZEtTH" 

483 PR INT "8881— , MSVESZfíOS, HLV, flNNHK HE- Hl LYEITM, HIT Hfi J OV 388, MRfiQfiR JELZI. Hfi LOV" 

484 PRINT" EtlHL , MGEO fi GETM, Hl 9 Hl HfiJOtBt/HUfi MELLE:"M, Hl CSftPOrMU.MDIK fiZ UTM-W" 

485 PR INT "RÉS TENGERRE, M fi GOLVODM, Hl JELET fiO KI. Hfi NINCS MfiDBI, MR EGY I-Hl KOT" 
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486 PRINT“ O'TS■ ül— -MCMEK SEM E"iKí, *SP Hfi-JOni, KOR, “CHRiP< 34> “ @ " CHR$ <34 > " BEIRRSfint" ; 
48? PRINT“«*«»«, , ,WVfiL W KEnt, WRHETEÜ R DQnt-WNTETLENT. ÜGYÖN int, XI3V ROHRTOD" 
488 PR IMT'* FEL fi .JfiTEn»ttl, , WKOT LS. “ ; =00800512 ’ POKE53280, . G0T05Í5 
O 512 PRlNTTfiB<30>»a_JBNttaiMMWal SPflCE >P0KE2023,62>POKE188/. 

513 MR IT138, t < GETfi* = IFfiíO.THEN5.. 

514 RÉTURH 

° 515 fisF="+-0123456789“ = FOR.J® 1TÚ12 • B$®B*+ " mn" •• C*=C*+ "ISLIJU" < HEXT 
516 PRIMT“m fi B C 0 E F 6 H 1 J K. L 51"; 

O 51? F0RI»lT0l2'PRINTSPCd5>MI0*<fi*,I,1>B*8PC<16>C$J=NEXT>C#«“R1“ 

518 F'RIMT" Ssi"SPC<25> " a TENGERI CSftTfi SS" SPC < 146> “CEnt, KL20M "SPC<?1>> 

519 PR 1 NT"KEZDET*1/ M8! "SPC<?3> "HRJüm, fXJ ■ fii "SPC<69> "MfiJűnt, W'ífiDftR < "SPC<69> > 

^ 528 PR I MT " GOLVOnt, WRfiOflR > " SPC < 69 > " 5i n HMM t - J HftJOnt, WP.ROfiR.JEL “ SPC < 26 > ; 

530 PRIHT"í* ^üll •“'GOLVOnt, KRfiOftRJf. “SPCG26> " aiBsl *»« • TftLfint, KLT HftJOnt, *ü" ; 
o 540 PRINTSPC<26>“ 5* «NI (B TRLfint, WLT HfiJOnt, BM“SPC<26> "f4W*)«a(»*Hfi.J0r«l, WRONCSnT ; 
550 C*« " fi" . Oar=»1" > £*«" FELR.RK.ftnt, KB < HÍM" . G0T0630 
560 K- 2 <e»»"LEm, wpem, wseo > ***r < gotosoö 

O 570 H»M+1 tPRINT"SWW0W“SPC<235>M«K>l <Esr.-“CEn», ML02Z 1 «««)•• -ü*®"a" 

580 IFEX®.THEN630 
q 590 V-l>G0SUB752<IFH®.TMEM630 

620 PR INTSPC <77 > fi* “ W" SPC <226> " , "SPC<29> " HftJORfiORR < " 

625 G0SUB410 < PR 1 NT “ fii n Kiül 11 Fi" ; 

O 630 PRINT"i»rSPC<2?>" "SPC<33>E»; >fi*®"“ 

648 P0KE284, . ■ POKE 198, . > Wfi IT198, 1 «ÜETB* > P0KE205,2 > MIT IT20?, 1, 1 . * POKE204, 1 
q 650 I FfiSC < B* > ®20RNDR*®" "TWEN648 

660 I.FfiSC < B3- > ®28THENPR I NT “II Bt" ; = fi*=LEFT* ( fi* , LEN < fii- > - t > * G0TG648 
670 IFK®.RNDLENCR*>®2QRLEN<:fi*>=3THENPRINT=6OTO760 
O 680 IFB*»"®"RN0K=.THEN648 

690 I Ffi*» “ ©" THENPR l NT > PR I NTSPC < 106> " , “SPC<.29>“ VEGE,! •• ■ GOTO 1130 

n 700 I Fft*® “ THENEX® - ‘.PR I NT " W" SPC <226 > “ " SPC < 23 > " " •• GOTQ2080 

U 718 IFfi*=" " BND < K®2fiNQB*““ +■"0RB*“"® " >THEN758 

720 IF<K®. RHOfl*®" "»3RK>. RNOLEN<fi*>®l>fiND<B*<"fi"ORB*> "L" >THEN640 
O 730 IF<:K=. RNOfií O " "ORIO. RNOLEN<fi* > =2>RNOCB*>"9"ORBí-C“8“RNOE$0 “ + “ITHDB.T-O "- " >THEN 
640 

r 740 IFIO. FlNOR*-" " fiNO<B*<" fi " ORB»> “ 0 " > THEN640 
U 750 fl*®fi*+BK'PRINTBK;‘0ÜT064Ö 

752 N= . •• PORI =VTOV+ 7 > G0SUB448 <TF2=. THENN® I > X®V+ 7 
o 754 NEXTtRETURN 

760 PRINTSPC< 106>" "SPC<29>" MtsaHMKRUKKt" ; 

770 IFK>.THENI«2üKftSC<LEFT*<fi*,!>>-65>+t<C*»LEFT*<fi*,l>»fi*-RIGHT»<fi*,2> 

' 780 EX-fiSC<LEFT*<fi*, 1 > >-64 > J-fiSCCRIGHTíFCfi*, 1 > > < IF.J®43THENFX®1 ‘GOTQ810 
790 IFJ=45THENFX=2•G0T0810 
o 800 FM=.J-45 

818 IFK=.THENI=2*<RSC< C?> -65> +1>GOTO1358 
820 IFK-2THEN1218 
C) 840 IFEX (. I > > 12T HEH 1340 

850 IFfiBS<EX< I > -EX > OfiMDRBS C FM < l >-FXX3THEN8?5 
O 86© 1 = 1 + 1 > IFI/2> I NT <I/2> THENPR INT "MESSZE VfiN*. " ■GOTO630 
870 G0T0858 
875 G<=EX'R=FX 

° 880 V=. •• V®. >FÖR'£ = 1TO16 1 lFEX®EXí I >fiNDFX=FX< l >THEH'i 1 ®I 1 I® 16 
890 IF<EX=EX<I>OREX=EXCI>-16>fiH0FX«FX<I>-16THENV®1 
O 980 NEXT•IFV>.THENPRINT"TfiLfint, WLT•">FX<V>«FX<V> + 16>G0T099© 

920 IFV®lTHEN988 
930 V=9■IFK®2THENV«1 

° 940 M=. <FÓRI»YTQY+7<G0SUB448>IFZ®.THENM®1>0=EXC1>■P®FXCI>■ l ~16 
350 HEXT'IFM®.THEN980 

O 960 IFK® 1 THENPR.INT"GOLVOnt, WRfiDfiR» “ SPC248 >fi* »GÜSUB4 1 0 • PR.INT“Síi ^>15t ^ ÜT ; > G0T0560 
970 L=l>EXC. > =0■FX <. > ®P 

988 PR INT "NEM' TfiLfint, KLT ! “ • IF,V“lflNÜK®2TNENV®. >GOTO4000 
O 9>3i IFV® l THENV®. > G0T0568 

983 G0SUB410 > PR INTŐT-" ai «8*S 9W" i > IFK®1 THEN568 

q 985 GQTÖ4008 

J 990 IFY/2® I NT <V/2 > RNOFX V— 1 > M2THENY®Y-1 « GOTO 1858 
10O0 I FY/2> I NT < V/2 > RNDFXÍ V-i l > > 12THEN1058 
O 1010 00SUB410 '■ PR INT " a| sl WWI « Ft"'; • IFVOTHENPRI NT " n«t“ CHR^ < I MT < Y/2+. 5 > +64 > ; 

1O20 IFK-2THENL®.'G0T040OÖ 
n 1025 GOTO560 

U 1030 IFFXCVX13THEHFX<V>=FX<Y> +16 

1040 IFFX < Yi 1 > < 13THENFJÍ < Y+1 > ®FX <Y+1 > +16 
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1045 GOTO1060 

1050 PR IMT " HDS!" SPC <226 > “ SUr'St-W.L'.HS JHVEO ! 

106O EX=EX<V> ■ FX=FX<V>-1.6 • GOSUBl120 • EX=EX<V+1 > > FX»FX<Y+1 >- 1.6 

1070 GOSUBl120 < er-í<Y)«£*í<Y>+16«EXCY+1 >*£*/.<Y+1 >+16 

1080 V=t>GOSUBl130>ÍFV=.THEH1125 

1098 V=. • V=9 • GOSUB1190 • I FV=. THEN11 70 

1100 IFOt=‘*t2"THENL=. »OOTO4880 

1105 IFK,= 1THEN5Ő0 

1110 RETURN 

1120 GOSUB410 - 'RETURN 

1125 V-. >V«9<GOSUBl190 >2=1•IFV-.THEN2--. >G0TÖU35 
1130 Y=1iGOSUBl185>IF2 ».ThEN7=9<GOSUB1185 
1135 FÓR. 1=9TG 16 • IFFXC. [ »12THENI 168 
1148 EX=EX< I > > FX=FX< I > 

1150 G0SUB418 • GR IHT “ VJU *.««» 

1160 HEKT < ÍF2=lTHENPEIHT"&KWlW"TfiB<226> "PUT3ÍI mvY'M, *HY VAGY <ENO 
1165 PR IHT “ mOMMWSr SFC <226 > " DOnH-RNTT*! WETLEN ! “ ; > EHÜ 

1170 PRINT" Sfól" SPC < 226 > “ VE'TBI/ WGE > " SPC < 149 > " LEGYOrSBt -MZT£n*l, Rt. < " ; > ENO 

1185 Z~. «FOR J=VTOY+6STEP2 > IFF«<.JX13RH0FK<J+1 X13THENZ-1 • J-V+6 
1188 NEXT>RETURN 

1198 V=. < F0RJ»VT0Y+6STEP2' IFFX'C JX13THENV=1 <Y»Y+6 

1200 NEXT 1 RETURN 

1210 IFEXC l »12THEN134Ö 

1220 IFFXC 1»120RFXC1+1»12THEMPR1 MT“SETHI/ HRUmi-WLT HBJOnBL " > GQTO630 

1230 ifex=exc i >finofx=fx<: i >orex=ex<i+i >rnofx=fxc i+i >thenex=. GOTO 2000 

1240 G0SUB440 • IF2=1THENI=I+1 ' 00SUB440 > 1FZ-1THEN143© 

1250 IF I /2= INT C I /2 > THENI ■ l -1 'GOTO 1270 
1260 1=1+1 

1270 GOSUB410 > PR INT" SÖTC*" >*K1 BEJ" ; ’ V=EX • Z=FX ■ EX=EX< I > ’ FX=FXC I > ' GÜSUB41© 

1280 PR INT"* SÍ MUHI Síri"; = EX< I >=V > FXC I >=2 1 G=. ‘ POR J=1 VO16 ’ 1F J=I THEN 1300 
1290 IF C EX < J > =VGREX C J > -16=V > RNO C FX < J > = 20RFX < J > -16=2 > THENG=J ' J=16 
1300 NEXT'IFG=.THENS=V>T=2'GOVÜ2Ű0W 

1 3 10 V«2* I NT < I/2— . 5 >+1 ' PR I NT “ »“ SPC <226 > " í*XTII-JBTl<.Or»IU*EEr**, KB I •* * GOSUB 1038 
1328 IF EX <: G > > 12THEN1999 

1338 V»2* I NT (. G/2-. 5 > +1 > GOSUB 1038 1 GOTO 1999 

1348 PR I NT “ ELTU'TII—KINT HR-IOTMC " •GQTQ630 

1358 G= I • IF0T«"2"THENG=I+). ■ GOSUB440• IFZ* 8 1 THEN1430 

1368 EX < 0 > =EX ’ FX < G > «*F X < I FC*+0* * "Ml" THEN 1398 

1370 IFC$+Q*“"R2" THEN 1390 

1380 GOSUB6610'IFZ»1THEN143Ö 

1.330 G0SUB418 1 PR INT" adTCSF" KBMt BEI" i 1 I FC*+0*»“ 02“ THEH6440 
1400 IFD4=“2"THEHCar =CHRTCRSCCC-T-> +1 > ' 0*=" 1" ‘ GOTO 1420 
1410 04="2" 

1420 PR I NT M SPC <235 > C*0* ' GOTO630 

1438 PR INT "NEM JOTat KI 1 “ < G0T0638 
1999 PRINT" »" SPC<226 >" 

2008 04= “ S“ > PR INT " isi" SPC C 196 > " IBI" i ‘ 1 FN«. THEH2810 

2005 IFFX<:NX12.THENY=1 'E5>EX<H> • FX=FXCN> ' G0SUB752 > £FN>. TI IENEX=EX<H> ' FX=FXCH> < GOT 
02700 

2010 1FEX>.TMEHY-9>EX=S<F X=T >G0SUB7S2'IFI l>.THEN2700 
2820 2=. ' F0RJ'= 1TOÖ 

2830 IFEX < J > C13F1NDFX < J > > 12THEHZ-1 ' 1=1' •1=8 

2048 NEXT = V=. 'IFZ-.THEN20S0 

2045 GOSUB6520’GOSUB2900'1FZ-1THEN2045 

2847 G0SUB2758'IFZ-lTHEN6OSUB2008'IF2>.THEH2708 

2048 Y=V+1 ' I FVC2@THEN2.045 

2058 V=.=V=.«IFL-.THEN21S0 

2068 L«. 1 I = . ’GOSUB6520'OOSUB2900 >IFZ=1THEN2Ö6Ö 
2078 IFRNOC1><.5THEH2078 

2872 GOSUB2750>IFZ=lTHENGOSUB280@'IF2>.THEN278Ű 
2874 V=V+1'IFV<14THEN2060 
2878 V*. 

2880 I = 18' E.XC I > =EX > FX< 1 ) =FX ' GOSUB6530 ' lFEX<. > =EXFlNOF XC. >-FXTWEH208Q 
2890 GOSUB2900'£FZ»tTHEH2080 

2092 GOSUB2750•IF2=1THEHG0SUB28Ö0'IFZ>.THEH27Ö0 
2894 V=V+1 ' IFYO4THEH2080 
2096 V=V+1'IFV<14THEH206@ 

2158 V*. ' IFRNOC1X.5THEN22SB0 
2168 Y=V+1'IFV>14THEH2280 

2165 1=18‘EX<I>-Q'FX<I>»R'OOSUB2210'GOSUB2750*IF2=ITHENGOSUG290O'IFZ-.THEN2180 
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2178 G0TÚ2168 

2180 GOSU62800 • IFZ>. THEH2700 
2198 GOTO2160 

2200 I = INT<RNO’< 1 >*8>+9 = XF l> 160RFXC 1 >>12{ i tEN2200 
2285 GQSUB2218 

2206 J » 1024+8O*FX+2*£X = ÍB'PEfct? <.J X>31RU0PEEl=.'.: J ,• O32THENGÜSUB29Ö0 = XF Z~. THEH27ÖÜ 

2207 G0TO220Ö 

2218 £X=INT <RNO< 1 > *6 >+EX <. 1 >-2 * I F EX>EX C X > +20REK< 1 OREX> 12THU<2218 
2220 FX-XNT<RND<l>*6>+FX< 1 >-2 < IFFX>FX< I >+2QRFXC 10RFX>12TMEN2220 
2225 RÉTURH 

2780 J-FJí+45 •• 1 FF X— 1TFlENl=48«GÜTÜ2728 
2705 JMFX+45 < IFFX-1THEMJ-43 < GOT0272Ö 
271Ö IFFX-2THENJ-45 

2720 B*=CHR*CEX+64> + CHR*C J >=PRINT«*SPC<68 >; =G0V0888 

2750 2=. > J»983+80*FX+2*EX = í FPEEKC 3 >0160FIHOPEEK CJ >081 FtNOPEEKC J+41 >OS2THENZ« 1 
2760 RÉTURH 

2808 2==. »FŰRJ«9TQ16* IFflBSCEXf. J>-EXX3flNORBS<FXO >-FXX3THEN2«J • J-I6 
2818 HEXT<RETURN 

2980 2==. »FQRJ=9T016« IFEX< 3 >-EXftNOFXCJ>«FÍ íThEN2» 1 <J=16 
2910 HEXT'RETURN 

4008 V»9■GOSUB1185=1F2=.THEH5508 
4010 IFM=.THEN4050 

4028 V=9 > EX-S > FX=T < GÓSUB752 < IFN«*. THEH4850 

4038 V=H • GOSUB570O ' IF2=. THENEX=EX<N> ■ FX-FXÍN> = GOTO5000 

4050 V». > EX=C! 1 FX=R' F0R.I=9TÚ16 : GQSUB448 1 172=. VHEHV-X •• 1 = 16 

4068 HEXT ■ IFV>. THENGO8UB5700 • IF2=. THENEX—EX (. V> = FX*=FX<:v> = GOTO5O00 

4108 IFU>8THENV=U > GGSUB5708 1 IF'2=. THENEX»EX<U> >FX=FX<U> •• U*. = GOTO5108 

4288 EX=G *FX=R<V==. >OOSUB2880 

4210 IFZ>.THENV=Z > I3OSUB5700 > 1FZ». THENEX“EX<V> = FX=FX<V> < GOTO5100 
4228 GOT05508 

5808 U==V+1 > i F V/2- í. NT < V/2 > THENU-V-1 

5180 V—. = I-V+l = IFV/2— XHT<V/2> THEN í. — V— 1 

511© V=V+1 > GOSUB6520 = 1 FEX«EX< V > FIHDFX=====F'X < V > THEN511Ű 

5120 2». > FQRJ—1T016 

5130 l F<EX-EX<; 3 >OREX-EX <3 >-16>FIHŰ<FX=FX< 3 >ÜRFX==FX <3 > 16 >THEN2 -1 ■ 3- 16 
5140 HEXT • I F2= 1 FlHDVC 14THEN5110 
5150 1F2— t THEM5500 

5280 2—EX • Y—FX • EX-EXCV > > FX-FX.<V> > GOSUB410 > PRÍ NT “ »«»! " 

5210 EX—2«FX»V»G0SUB418 * PR MT'OSa MM SKT 
5220 EX<V>»EX<FX<V>=FX>GOTOS70 
5588 EX=.•GOTO570 

570© 2—. * 1F F X < V > > 12THEN2 = 1 ■ RETURN 
5718 J-V+l 1FV/2— I NT <. V/2 > THEH..)'—V-1 
5720 T. FFX< S > > 12THEHZ-1 
5738 RETURN 

6448 PRINT"M"SPC< 106> “ T»l « “SPC< 149> " S Vftr»l, «RJ 1 *"SPC<72>; 

6450 PRINT"LOnil-MVEnn> m ■■ 1" > FÓR 1«9T0158TEP2 

6460 EX<I>=IHT<RNO<1>*12+1>>IF£X<1>«13THEN6460 
6478 FX< I > —INT<:RHD< 1 >*12+1 > > IFFX< I. > = 13THEH647ö 
6488 G=X•GOSUB6610•IF2-ITHEN646© 

6490 GOSUI36520 * 0= 1+t • EX<G >-EX • FX<0>»FX > G0SUB66 1 ö ■ 1F Y> 14THENV-. ■ GOTO6460 

6580 IFZ=1THEN6498 

6510 NEXT ' V=. >PRINT“«W“SPC<226>" K.EHM M2DCBI /m < " 

6515 FORI-9T016 >EX=EX<I>>FX=FX<1><G0SUB41©>PRINT-15Ö BS«» Wl">HEXT>EX=. -G0T057Q 

6528 EX=EX< I > • FX=FX< I > > IFFX> 12THENFX—FX-1.6 

6530 J= íNT (. RNO f. 1 > *8 > • IFJ-8THENB530 

6540 IFJ-C2THENEX=EX-1 •■GOTO6580 

6550 IFJ<4THEHEX=EX+1«G0T0658Ű 

6560 IFJ-C6THENFX—FX-1 ‘GOT06580 

657© FX-FX+l 

6580 X FFXC1ORFX>12ÖREXC1OREX>12THEH6528 
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6590 RETURN 

O 6610 2—» >FQRJ«*ÍT0G-1 < lF1 NT<G/2>-G/2RNDJ-G-1THEN6668 

6620 IFEX<G>«EX<J>fiNOftBS<FX<:G>-FXCJ>><2TH£NZ=l =V=V+l >J«Q-1 =00X06648 


6630 1FFX<'. G > =FX <1 • J > RNDRBS <Et-i <. G >—EX<'. 3 > X2TMEN2-1 *V»V+1 = J-G-l 
O 6648 XFG/2MHTCG/2>FlNÜ2=lTHENY=V-l =00106668 q 
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EGYESÜLET 


Cf 

Commodore 720-as 1001 

floppy és C 8028 Marg tár¬ 
csás printer, leírását, progra¬ 
mot vásárolnék. Gerber, Tel.: 
72/35-594 

Használhatatlan C-64 + 

1541-es floppyt, MFS 802- 
803-as nyomtatót, monitort 
vásárolnék. Gerber, Tel.: 
72/35-594 

Totókulcskészítő programok 
C-64-re (8 Kb-osak). Válasz- 
borítékért tájékoztató. Nagy 
Miklós, Újfehértó, Pf.: 41. 


C-64 + magnó + 100/805 + 
20 x 50-es Newton és Kep¬ 
ler távcsöveket C-128 + 
floppyra cserélném. Tóth 
Zsolt, Vámospércs, Bartók 
B. u. 55. 

C-64-es tápegységek javítása 
(cserével is), rossz egységek 
vétele. Régi, hibás C-64-es 
alapegység vétele. 1224 Bu¬ 
dapest, VII. ü. 4. Tel.: 227- 
22-60 

C-64-re programokat eladók, 
csak lemezen. Válaszboríté¬ 
kért listát és tájékoztatót 


küldök. Czifra Zoltán, 5231 
Fegyvernek, Kiss János u. 
18/a. 

C-64-re adok-veszek-cscré- 
lek programokat, csak leme¬ 
zen. Listát kérek és küldök. 
Ugyanitt HARDWARE ki¬ 
egészítők rendelhetők. írjál!!! 
Címem: Pázsit Tibor, 5650 
Mezőberény, Várkonyi u. 1. 

C-128/64 gépre programokat 
adok-veszek-cserélek. 

11.000 programom van. 
Cím: Járóka László, 1576 
Budapest, Pf.: 102. 


C-64-re új programok el¬ 
adók 60 Ft/lemez áron. Vá¬ 
laszborítékért listát küldünk. 
Szabó Sándor (GSOFT), 
1204 Budapest, Maros u. 98. 

Videós élmények C-64-en 
digitalizálva. Olvassa a ké¬ 
pújságot C-64-en 4000-féle 
Commodore-alkatrész. Tel.: 
173-17-83. 

Programok készítését vállal¬ 
ja a BCSB TEAM C-64-re 
és C+4-re. Cím: Sidló Csa¬ 
ba, 3242 Parádsasvár, Arany 
J. u. 33. 


NOVOTRADE—2C Kft. ÁRLISTA 


Hardverek 

C-64 alapgép 13 990 Ft 

VC 1541/11 floppy drive 15 990 Ft 

Datasette 2 990 Ft 

Amiga 500 alapgép 39 990 Ft 

Amiga 500 Plus alapgép 48 000 Ft 

1351 Mouse (C-64-hez) 2 990 Ft 

A 520 RF modulátor 3 900 Ft 

Amiga tárbővítő 6 000 Ft 

RocHard Hard disk illesztő 22 500 Ft 

RocHard Hard disk illesztő + 

40 Mbyte Winchester 50 000 Ft 

RocGen Genlock RG300 10 750 Ft 

Ethernet Card (A2000-hez) 35 000 Ft 

MPS 1230 nyomtató 24 500 Ft 

Philips 8833/11. (Amiga, C-64) 33 000 Ft 


C64 játékok 

kazetta 

lemez 

Chamonix Challenge 

499 Ft 

549 Ft 

Eddie Edwards Super Ski 

499 Ft 

549 Ft 

Hostages 

549 Ft 

599 Ft 

Impossible Mission II 

581 Ft 

668 Ft 

Rolling Twins/I want more.. 

— 

549 Ft 

Operation Neptune 

— 

599 Ft 

Prohibition 

499 Ft 

— 

Sim City 

— 

599 Ft 

Space Racer 

— 

599 Ft 

Tin Tin on the Moon 

549 Ft 

599 Ft 

Warlock's Quest 

499 Ft 

549 Ft 

Xonox 

399 Ft 

499 Ft 

Import járékkazetták 

549 Ft 

— 


2C Áruház, Budapest XIII., Balzac u. 35. 
Tel.: 1402-954 


Hardverkiegészítők 


2 RCA kábel 

410 Ft 

3 RCA kábel 

575 Ft 

Hálózati kábel 

480 Ft 

Adat kábel 

360 Ft 

Antenna kábel 

340 Ft 

Antenna váltókapcsoló 

490 Ft 

C64/128 Euro kábel 

685 Ft 

Amiga Euro kábel 

1 250 Ft 

Ékezetes Eprom SP180 VC 

2 545 Ft 

Ékezetes Eprom MPS 1230 

3 500 Ft 

Joy (Qulck Shot II Plus) 

850 Ft 

Tápegység C64 

3 000 Ft 

Tápegység VC 1541/11 

3 000 Ft 

12" mono filter 

700 Ft 

12" color filter 

750 Ft 

14" mono filter 

800 Ft 

14" color filter 

850 Ft 

Disk Box 5'25" 3 db 

99 Ft 

Disk Box 307 5'25" 50 db 

700 Ft 

Disk Box 309 5'25" 100 db 

800 Ft 

Disk Box 310 5'25" 120 db 

850 Ft 

Disk Box 313 3'5" 10 db 

150 Ft 

Disk Box 318 3'5" 40 db 

550 Ft 

Disk Box 319 3'5“ 80 db 

750 Ft 

Disk Box 320 3'5" 140 db 

800 Ft 

Mouse Pad 581 

250 Ft 

Mouse Pad + Holder 

500 Ft 

Mouse Set 

1 000 Ft 

Cleaner 562 5'25" 

150 Ft 

Cleaner 563 3'5" 

150 Ft 

Mouse Holder 

250 Ft 

Mouse takaró 

250 Ft 

Copy Holder 411 

750 Ft 

Copy Holder 412 

1 250 Ft 

Display szemüveg 

750 Ft 


45 ÁPRILIS 


o 



















EGYESÜLET 



1 

CM 

86/ 0 

GOTO X Databecker 

40,- 

2 

C64 

86/ 0 

GOTO X Ont.a Welt 

40.- 

3 

C64 

86/ 0 

Hangzó billentyűk 

40. - 

4 

C64 

66/ 0 

Memória kiirás 

40.- 

5 

C16 

86/ 0 

Rajzoló program 

90.- 

6 

C64 

86/ 1 

Atsors 2 ámozó program 

40.- 

7 

C64 

86/ 1 

Help trace 

40. 

8 

C16 

86/ i 

Hangmemória 

110.- 

9 

C64 

86/ 1 

Teke home computer 

60.- 

10 

C64 

86/ 1 

Csak kezdőknek 

40.- 

11 

C64 

66/ 1 

Bi 1 lentyükódok 

40.- 

12 

C64 

86/ 1 

Autonumber 

60 . - 

13 

Cl 6 

86/ 1 

Basic bovitö 

60.- 

14 

C64 

86/ 1 

BASIC billentyűzet 

60.- 

IS 

C64 

86/ 3 

Oazlopdiagram 1. 

90.- 

16 

C64 

86/ 2 

Per 1 féríavizsgálat 

40.- 

17 

C64 

86/ 2 

Sprite mozgatás ÍRÓ 

60.- 

10 

C64 

86/ 2 

NOSCROLL 

60.- 

19 

C64 

86/ 3 

Lemezmenü 

40.- 

20 

C64 

86/ 3 

Ékezetes nagybetűk I. 

40.- 

21 

C64 

86/ 3 

Ékezetes nagybetűk 1I. 

40.- 

22 

C64 

86/ 3 

Notesz 

110.- 

23 

Cl 6 

86/ 2 

TURB0BASIC 

130.- 

24 

VC20 

86/ 3 

Péter es Pál 

90.- 

25 

C64 

86/ 4 

Mozart 

90. - 

26 

C64 

06/ 3 

Segítség 1 íst ázáshoz 

60.- 

27 

C64 

86/ 3 

MERÜL 

60. - 

28 

C16 

86/ 3 

Billentyűzet kódoló 

40.- 

29 

Cl 6 

86/ 3 

Kódoló szabadon 

40,- 

30 

C64 

86/ 4 

AUTÓ-INSERT 

40.- 

31 

C64/+4 

86/ 4 

Kaland játék/Gengszter 

110.- 

32 

VC20 

86/ 5 

TG MONITOR 

130.- 

33 

C16 

86/ 4 

Ablakok 

60.- 

34 

C16 

86/ 5 

Karácsony 

60.- 

35 

C64 

86/ 6 

Kockás zene 

60.- 

36 

C64 

86/ 5 

Képújság 

60.- 

37 

C64 

86/ 5 

Sprite editor 

90. 

38 

C16 

86/ 6 

SAVÉ LOAD szignál 

40.- 

39 

C64 

06/ 6 

Rubik kocka síkban 

90. - 

40 

C64/S 

86/ 6 

üszlopdiacrramm 3 

60.- 

41 

VC20 

8t>/ 6 

Winnwtou 1 

60, - 

42 

VC20 

86/ 6 

Winnetou 11 . 

60.- 

43 

C64 

B6/ 6 

Str mgrendezo 

60. 

44 

C64 

67/ 1 

Lemezátnevező 

40.- 

45 

C64 

87/ 1 

Óra 

60. 

46 

C64/S 

87/ l 

111 perkocka 

60.- 

47 

C16 

87/ 1 

ASSEMBLER 

130.- 

48 

C16 

87/ 2 

Takarító 

60.- 

49 

C64 

87/ 2 

Ouadro-vizio 

40.- 

50 

Cl 6 

87/ 2 

Tel©zsák 

130.- 

51 

C64 

87/ 3 

Stingkeresö 

40 . - 

53 

C16 

87/ 3 

Hangos b:1lentyuk 

40. 

54 

VC20 

07/ 3 

Ra jzol 6 

40 . - 

55 

+4 

87/ 4 

Karaktertervező 

110. - 

56 

C64 

87/ 4 

Dupla BASIC 

40- 

57 

VC20 

87/ 4 

Kerde torony 

90 - 

58 

C64 

87/ 5 

GEOMASTER/lefordított/ 

130.- 

59 

C64 

67/ 5 

GEOMASTER/RAStC változat/ 

no.- 

60 

C64 

87/ 5 

Golyózó 

110.- 

61 

44 

87/ 5 

Magyar BASIC 

no.- 

62 

+4 

87/ 5 

Kukkolő-RASI C monitor 

60.- 

63 

44 

07/ 6 

Sprite editor + 

no.- 

64 

C64 

87/ 6 

Magnó directory 

130.- 

65 

C16 

87/ 6 

Nagy te 1 bontású hardeopy 

110.- 

66 

C16 

87/ 6 

Sztereó vízió 

40.- 

67 

C16 

07/ 6 

Kukko16-Szuper peek 

90 . 

68 

Cl 6 

07/ 7 

Mentőöv 

40.- 

69 

+4 

87/ 7 

Ablakozó 

110.- 

70 

C64 

87/ 8 

Coramc-öo-re/öASlC vált. 

130. 

71 

C64 

07/ 8 

CDMMO rio-re/lefordított/ 

1 30 . - 

72 

+ 4 

87/ 8 

Kukkoló-bovitett monitor 

60. 

73 

+4 

87/ 3 

Ékezetes betűk 

60.- 

74 

+4 

87/ 8 

PLUTO-ra J 20 1ó program 

130.- 

75 

VC20 

87/ 8 

Ka lomfogó 

90.- 

76 

C64 

87/ 8 

Többtényezős döntések 

90. 

77 

C64 

87/ a 

Raszter 

60.- 

78 

C16 

87/10 

Append 

90.- 

79 

C64 

87/10 

Nagyi tó 

90.- 

80 

C64 

87/10 

Makrók 

90.- 

81 

Cl 28 

87/11 

Stuktura 

60.- 

82 

Cl 28 

87/1 1 

Emiékeztetó 

60.- 

83 

C64 

87/1 1 

Móni torka 

90.- 

84 

C16 

87/11 

Címről-címre 

60.- 

05 

C64 

87/12 

Gyors scrol1 

90.- 

86 

064 

87/12 

1541 

90. 

07 

C64 

87/11 

1541 4 Kom torka 

130.- 

86 

C16 

87/12 

Lokál is változók 

90. 

89 

C16 

07/12 

Tekergő 

90.- 

90 

C64 

88/ 1 

Fekete-fehér 

40.- 

91 

Cl 6 

88/ 1 

Datás:tó 

60.- 

92 

C64 

88/ 1 

Programkönyvtár 

90.- 

93 

C16 

88/ i 

Katasztrófa 

60 . 

94 

VC20 

88/ 2 

TG BASIC 

130.- 

95 

C64 

68/ 2 

Topy typer 

90.- 

96 

C64 

88/ 2 

sprite editor super 

130.- 

97 

Cl 6 

86/ 2 

katasztrótagép 

60.- 

98 

C64 

68/ 4 

Modulgrafika 

130.- 

99 

C64 

88/ 4 

Segítség ! 

60.- 

100 

C64 

88/ 5 

Gurítsd a golyót! 

130.- 

101 

+4 

88/ 5 

Egyenesre jzoló 

60.- 

102 

+4 

08/ 6 

Szótár 

130.- 

103 

Cl 6 

88/ 7 

Gitáriskola 

130.- 

104 

C64 

80/ 7 

Gyors BASIC 

60.- 

105 

Cl 28 

88/ 7 

Super hardeopy 

90.- 

106 

Cl 28 

88/ 7 

Grálíkus nyomtatás 

90.- 

107 

Cb4 

88/ 9 

Fást validate 

130. 

109 

C64 

88/ 9 

data bóv-ito 

60.- 

no 

C64 

80/ 9 

DEF FN/X/ 

60.- 

111 

*4 

86/10 

Magyarosító 

110.- 

112 

C64 

88/10 

Diszkkezelo 

90.- 

113 

C16 

88/10 

DISASSFMBLER 

60. - 

114 

C64 

68/11 

Négy képernyő 

40.- 

115 

C64 

88/11 

Ablakok 

40.- 

116 

C64 

88/ll 

ASCII képernyő 

40.- 

117 

C64 

88/11 

P 1 1 1 a na r. f e ; ve f e 1 

40. 

118 

C64 

88/11 

31 inky 

40.- 

U9 

C64 

ao/i i 

Színes viiioptatc 

40 . - 

120 

C64 

80/11. 

80 karakteres üzem 

40.- 


121 

C64 

88/11 

Vi1logtató 

4U . - 

122 

C64 

88/11 

Joystick lekérdező 

40. 

123 

C64 

88/11 

Gyors sprite mozgatás 

40. 

124 

C64 

08/11 

DFF FN - másképpen 

40 . — 

125 

C64 

00/12 

Szuper input 

90. 

126 

C64 

88/12 

Ugráló színsávok 

60.- 

127 

C64 

89/ 1 

HP.INT AT 

40. 

128 

Cl 6 

89/ l 

Funkcióbiilentyuk 

40 . - 

129 

C64 

00/12 

Mi ni he 1p 

40 

130 

C64 

89/ 2 

Házi pók 

90 . - 

131 

C64 

89/ 2 

Csi1lagos eg 

60.- 

132 

C64 

89/ 1 

Szalagról lemezre 

90. - 

133 

C64 

09/ 1 

Km f fel 

110.- 

134 

+4 

89/ 1 

Zombi 

130. 

135 

C64 

89/ 1 

Kétoldalas listázó 

130.- 

136 

♦4 

89/ 1 

Objektív osztályozás 

110. - 

137 

+4 

89/ 2 

Tömöritó 

40.- 

136 

*4 

89/ 2 

Kifejtő 

40. - 

139 

+4 

89/ 3 

3-p)usz-l magyarm 

90. - 

140 

+4 

89/ 3 

Napió -keze 1 ö 

60. - 

141 


89/ 3 

Analóg óra 

40.- 

142 

Cl 20 

89/ 3 

Javított renumber 

90. - 

143 

+4 

91/6 

Beszélő '>4 

40 . - 

144 

C64 

89/ 4 

Keret csíkozás 

40.- 

145 

C64 

89/ 4 

Mozgo lelirat 

40. - 

146 

C64 

89/ 4 

26. sor 

90.- 

147 

Cl 6 

89/ 4 

Opt input 

60. - 

148 

Clb 

89/ 4 

Turbo-block 

60.- 

149 

Cl 6 

89/ 4 

Finom seroi 1 

60.- 

150 

+4 

89/ 4 

Animáció 

130.- 

151 

Cl 26 

89/ 4 

Pót funkciók 

40 . 

152 

PLUSZ4 

89/ 5 

Betüradar 

90.- 

153 

064 

89/5 

RHP vírus kereső 

90. 

154 

C64 

89/ 5 

Képmutató 

130.- 

155 

Cl 28 

89/ 5 

VDC mint RAM floppy 

60 - 

156 

Cl 28 

84/ 5 

Joy Sprite 

60. - 

157 

C64 

89/ 5 

Javított liut 

60 . - 

158 

064 

89/ 5 

Zenei segédlet 

130. 

159 

C16 

89/ 6 

Szinbeal1ito 

60.- 

160 

C16 

89/ 6 

PLUS/1 listázó 

90.- 

161 

+-4 

89/ 6 

Fást validate 

1 30. - 

162 

C64 

89/ 6 

Balnyileopy 

90. - 

263 

C64 

09/ 6 

3-D labirintus 

130. - 

164 

C64 

89/ 6 

Mini vírus 

90 - 

165 

C12Ü 

09/ 6 

VUC-window 

60. 

166 

C64 

89/ 6 

Címke író 

60.- 

167 

C64 

89/ t» 

Piros-fehór-zóld képernyő 

40.- 

168 

CM 

89/ 7 

GEN-GET-INPUT 

90.- 

169 

+4 

89/ 7 

Szmbeá 1 1 itás 

60. - 

170 

-1-4 

89/ ? 

Nagyító /079 átírás/ 

110.- 

171 

+4 

09/ 7 

80 karakteres szóvegszerk 

180. 

172 

Cl 6 

89/ 7 

Ékezetes betűkészlet 

130.- 

173 

C16 

89/ 7 

Kisebb ékezetes nagybetűk 

90. - 

174 

C64 

89/ 7 

Gyors directory 

90.- 

175 

C64 

89/ 7 

AUTOSTART 

90. 

176 

C64 

89/ 7 

MULTI 16 

90.- 

177 

C64 

89/ 7 

MULTI iG DEKO 

90 

178 

C64 

89/ 7 

Eger 64 

90.- 

179 

C16 

09/ 7 

Flash -Load 

90- 

180 

Cl 6 

89/ 7 

BAUIt'-LISTA-SCROLL 

90. 

181 

♦4 

89/ 7 

2x2 karakterek 

40.- 

182 

+ 4 

89/ 7 

2x2-es karakterek 

40.- 

183 

Cl 6 

89/ 7 

Kereső 

40. - 

184 

C16 

89/ 7 

Boritékcímező 

110.- 

185 

C 64 

89/ 7 

DEC—HEX-B1N 

130. - 

186 

C64 

89/ 7 

Obiect savé 

60.- 

187 

C64 

89/ 9 

Sprite 

90.- 

188 

C64 

89/ 9 

Bioritmus 

60.- 

189 

C16 

89/ 9 

Turbo Trans 

150.- 

190 

C64 

89/10 

Névjegy 

60.- 

191 

C64 

89/10 

Kórokozó 

90.- 

192 

C64 

89/10 

SCAN 

90.- 

193 

+4 

89/10 

DlSC CRAOK 

130.- 

194 

064 

89/11 

Függvényábrázolás 

100. 

195 

C64-16 

89/1 1 

U.i Opt input 

90.- 

196 

4 4 

89/11 

Szamkirakó 

130. 

197 

C64 

89/11 

Cél lövölde 

60. - 

190 

C64 

89/ 1 2 

Esperanto 

no.- 

199 

+4 

Ö9/12 

Lépegető 

90.- 

200 

+4 

90/ 1 

Raszter bűvölet 

40. - 

201 

+4 

90/ 1 

TOOL-7.0 

110.- 

202 

C64 

90/ l 

Óra a kereten 

90.- 

203 

C64 

90/ 1 

Műt ntópa1ca 

60.- 

204 

C64 

90/ 1 

Karaktertcrvezó 

90. - 

205 

C64/S 

90/ 2 

Csi 1 lagászat 

130.- 

206 

C64/S 

90/ 2 

Térképismeret 

60.- 

207 

C64 

90/ 2 

Smooth scroll 

60 

2U0 

C64 

90/ 2 

Fi le tester 

60 . - 

209 

C64 

90/ 2 

Line Tracer 

60.- 

210 

C64 

90/ 2 

Supervasor 

60. - 

211 

+4 

90/ 2 

Véletienszerü képesére 

90.- 

212 

+4 

90/ 3 

Karakter leíró 

40. - 

213 

C16 

90/ 4 

Zsolnai atlagszamito 

60 .- 

214 

C64 

90/ 4 

Labdák 

60.- 

Í 1 5 

064 

9il/ 4 

Funkcióbiilentyuk 

90. - 

216 

C64 

90/ 4 

Futó felirat 

90. - 

217 

C64 

90/ 4 

Jegyzettömb 

40. 

218 

C64 

90/ 5 

Videofelirat ózó 

60 . - 

219 

064 

90/ 5 

DUMP 

60.- 

220 

*4 

90/ 5 

Bűvös négyzet 

90. 

221 

C64 

90/ 5 

Szuper BONGÓ 

60.- 

222 

C64 

90/ 6 

videokatalógus 

110.- 

223 

C64 

90/ 5 

Uatakészito 

yo. - 

224 

Cl 28 

90/ 6 

Cartridge szimulátor 

130.- 

225 

Cl 28 

90/ 6 

Double charset 

60. 

226 

+4 

90/ 7 

Hatos lot.t.o 

60.- 

227 

♦4 

90/ 7 

BIT-MAP 

60 . - 

228 

C64 

90/ 7 

GEOií BOOT MAKER 

60.- 

229 

C64 

90/ 7 

Screen editor 

90 . - 

230 

C64 

40/ 7 

Szekvenciái is ti le listázó 

40.- 

231 

C64 

90/ 7 

Editorbevito 

130. 

232 

064 

90/ 7 

Kockapóker 

130.- 

233 

C64 

90/ 7 

Lemezbüvész 

90.- 

234 

C64 

90/ 7 

szuper autostart 

60.- 

235 

C64 

90/ 7 

Sípoló billentyűk 

40. 

236 

+4 

90/ 9 

Directory print 

90.- 

237 

♦-4 

90/ 9 

Órarend 

130.- 

238 

+ 4 

90/10 

Nyelvi gyakorló 

110.- 

239 

C64 

90/10 

Eprom szerkesztő 

60.- 

240 

C64 

90/10 

LED indikátor 

60.- 

241 

♦4 

90/10 

öröknaptar 

110.- 

242 

C64 

90/11 

Funkcióbi11entyük 

60.- 

243 

C64 

90/11 

Formapnnt 

60.- 

244 

C64 

90/11 

Csíkos képernyő 

40.- 
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245 

C64 

90/1 1 

elet .iátok 

90. - 

246 

C64 

90/11 

Videózó 

130.- 

247 

C64 

90/1 1 

SEJT 64 

180.- 

246 

C64 

90/11 

Betükirakó 

130.- 

249 

028 

90/1 1 

Input rutin 

110.- 

250 

C64 

90/11 

Dupla karakterek 

100. 

251 

C64 

90/12 

SPR1TE PEEPER 

90- 

252 

C64 

90/12 

SPRITE 

60. - 

253 

+4 

90/12 

Ka 1 om 

1130.- 

254 

C64 

91/ 1 

Vízszintes seroii 

60 . 

255 

C64 

91/ 1 

BASIC betöltő készítő 

60.- 

256 

C64 

91/ 1 

VER IFY MASTER 

90.- 

257 

C64 

91/ 1 

Hibamentes replace 

130. 

258 

+4 

91/ 1 

Autó Input 

130.- 

259 

C64 

91/ 1 

Törtek 

60.- 

260 

C64 

91/ 1 

Ablakozás könnyen 

90 . - 

261 

44 

91/ 2 

80-as képernyő 

80.- 

262 

C64 

91/ 2 

Fizikát észt 

50.- 

263 

C64 

91/ 2 

40 Sprite 

130.- 

264 

C64 

91/ 2 

Rast.er Master 

00. 

265 

C64 

91/ 3 

Rulett 

100.- 

266 

44 

91/ 3 

Tape-disc copy 

110.- 

267 

C64 

91/3 

BASIC rearrnnerer 

50. - 

266 

C64 

91/ 3 

BASIC decumpactor 

50.- 

269 

C64 

91/ 3 

BASIC merger 

50. - 

270 

C64 

91/ 3 

SE 1 KüS'HA 

60. - 

271 

C64 

91/ 3 

Cartridge szimuláció 

1 30 . 

272 

+4 

91/ 3 

Sally ku1caszökereso 

50.- 

273 

4 4 

91/ 3 

Merqe '.'44 

80 . - 

274 

Cl 20 

91/ 4 

:.5 MHz-es C64 

100. 

275 

C64 

91/ 4 

Morze - 11 

00 .- 

276 

C64 

91/ 4 

Gprint 

50.- 

277 

C64 

91/4 

ASCII - CHR$ 

50.- 

278 

C64 

91/ 5 

Rendező 

80.- 

279 

C64 

91/ 5 

Keret.beiró 

60.- 

280 

C64 44 

91/ 5 

NLQ Print 

60.- 

281 

C64 

91/ 5 

FLD 

50.- 

262 

CG4 

91/ 5 

Raster Split 

50.- 

203 

44 

91/ 6 

ProgramnyiIvantartó 

80. - 

264 

C64 

91/ 6 

Regiszter 

60.- 

285 

C64 

91/ 6 

Digital izé;* zene 

50.- 

286 

C64 

91/ 6 

Ékezete? MPS 802 

80.- 

287 

064 

91/ 7 

‘Ékezetes irat kész:tó 

100.- 

288 

44 

91/ 7 

Buvoe tAdiínap 

100.- 

289 

064 

91/ 7 

Dominó - H 

100.- 

290 

C64 

91/ 7 

Raktáros 

80.- 

291 

44 

91/7 

Tologató 

60. - 

292 

C64 

91/ 7 

Areri 2000 

50.- 

293 

C64 

91/ 7 

Bad L.amps 

60.- 

294 

C64 

91/ 7 

Operát ion Patriót 

50.- 

295 

44 

91/ 7 

Mozaik - 11 

90. - 

296 

44 

91/ 7 

Logi Kód 

60.- 

297 

064 

92/ 1 

Databevívö 

50.- 

298 

44 

91/ 7 

Bőmber 

50.- 

299 

44 

91/ 7 

Dominó K 

50.- 

300 

44 

91/ 7 

The Wa11 

40.- 

301 

C64 

91/ 7 

Mozaik • K 

50 

302 

•44 

91/ 7 

Dominó - R 

60 . - 

303 

♦ 4 

91/ 7 

*Borgok Kincse 

190.- 

304 

44 

91/ 7 

Asteroids 

60.- 

305 

C64 

9'./ 9 

Ékezetes ira• forrás 

40. - 

306 

C64 

91/ 9 

Yngo2 

50.- 

307 

064 

91/ 9 

Adventure - Sz 

130.- 

306 

C64 

91/ 9 

Morze Oktató B. 

130.- 

309 

44 

91/ 9 

Memory Game Pius 

100.- 

310 

064 

91/ 9 

‘('api taly 

130- 

311 

C64 

91/ 9 

•Gengszterek 

60. - 

312 

064 

91/ 9 

■Küldetés 2000 

100 - 

313 

064 

91/ 9 

Itt a i: hol a 4 

50. - 

314 

C64 

91/ 9 

Hewirig 

50.- 

315 

44 

91/10 

Mikrobi 

50.- 

316 

44 

91/10 

Neat of Kleao 

190. - 

317 

44 

91/10 

Adventure F 

1U0.- 

318 

44 

91/10 

A világ szeme 

150.- 

319 

C64 

91/10 

Gondolkozo 

100.- 

320 

C64 

91/10 

Memorí - 3 

130.- 

321 

44 

91/10 

Mátekasteiy 

lüü. - 

322 

C64 

91/11 

Lottó 

BO.- 

323 

C64 

91/11 

Totó 

00 . 

324 

064 

91/11 

Nemet gyakorló 

60.- 

325 

44 

9. /11 

Beszélő szótár 

1J0.- 

326 

44 

91/11 

F:le examiner 

60. 

327 

064 

91/11 

Sprite szerkesztő 

50.- 

326 

C64 

91/11 

Egyszínű Sprite 

50.- 

329 

C64 

91/12 

Rulett javítóé 

50.- 

330 

064 

91/12 

Tőzsde 

130.- 

331 

C64 

91/12 

10 teszt 

150.- 

332 

C64 

92/ 1 

Ka 1 and 1ap 

00.- 

333 

064 

92/ 1 

Levelíró 

00.- 

334 

064 

92/ 1 

K e p e r n yóma szkólO 

130.- 

335 

064 

92/ 1 

Sprite Kezelő 

10Ü.- 

336 

064 

92/ 1 

Sl - MPAR'l 

40. - 

337 

064 

92/ 2 

Patience Ouartet 

l JO.- 

330 

C64 

92/ 2 

Monopoly 

130. 

339 

C64 

92/ 2 

Akasztófa 

00.- 

340 

064 

92/ 2 

Karakt i-r tervező 

60. - 

341 

064 

92/ 3 

String Array Manager 

100.- 

342 

C64 

92/ J 

Sprite Basic 

50.- 

343 

064 

9 2/ 3 

Gcreen Help 

50.- 

344 

064 

92/ 3 

Gyors validate 

bO . - 

345 

C64 

92/ 1 

BASIC SYNTAXF.R 1 

190. 

346 

064 

92/ 4 

Tologató 064-re 

lOO.- 

347 

C64 

92/ 4 

ABC rondozo 

100. 

348 

064 

92/ 5 

‘Matek t Római szamok 

100.- 

349 

44 

92/ 6 

Tesztkészitó » értékelő 

lüü.- 

350 

064 

92/ 3 

BASIC SYNTAXER 11. 

190. 

351 

44 

92/ 7 

Három játék 

no.- 

352 

44 

92/ 7 

Szökés 

00. - 

353 

064 

92/ 7 

Tot.o 

150.- 

354 

064 

92/ 7 

DIGIT analízis program 

no.- 

355 

44 

92/ 7 

SCREEN DUMP 

150 - 

356 

064 

92/ 9 

UNISEQ fi lekezelő 

130.- 

357 

064 

92/ 9 

Graphic Copy 

60.- 

358 

064 

92/10 

Prmtfox Resizer 

130.- 

359 

044 

92/1 1 

Tologato II 

150 . - 

360 

044 

92/12 

Spr:te Plus-4-eo 

130.- 

361 

C64 

92/í 2 

Vaitozolista 

150. - 

362 

064.44 

93/ 2 

Szomszéd 'Aték 

200.- 

363 

C64 

93/ 2 

Táblás játék 

200.- 

364 

064 

93/ 2 

SEDA 

150.- 

365 

064 

93/ 2 

415 * 200 

120.- 

366 

44 

93/ 2 

OTP hitel 

100.- 

A *- 

ga l jelölt 

programok csak ieraezen rendelhetők 




Kérem, hogy a Commodore Újság legközelebbi számában 
jelenjen meg a következő szövegű apróhirdetés: 

(minden kockába egy betűt írjon) 


11 


11 


u 


Tagsági szám: 


Feladandó az újság címére: 

Commodore Újság 
Budapest, 1388. Pf. 86. 

Alulírott megrendelem a következő programokat a PÖTYÖ¬ 
GŐSZOLGÁLAT-tói: 


PROGRAM SORSZÁMA 

i- s LLL 

2 . 

3. 

4. 

5. 

6 . 

7. 

8 . 

9. 



ÁRA 

LU 

- Ft 

LU 

Ft 

LU 

- Ft 

LU 

- Ft 

LU 

Ft 

LU 

- Ft 

LU 

- Ft 

LU 

- Ft 

LU 

- Ft 


összesen: 


QJ 


db 


- Ft 


A programokat a SZOLGÁLAT által biztosított 
lemezre (99 Ft/db) 
kazettára (40 Ft/db) 

az általam küldött adathordozóra kérem. 

(Kérjük a megfelelő szöveg aláhúzását!) 
Postaköltség 4 munkadíj 
A fizetés módja: személyesen — csekken — 

(Kérjük a megfelelő szöveg aláhúzását!) 

ÖSSZESEN: 


utánvéttel 


A megrendelő neve: 
Címe:. 
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APRÓCSKÁK 



KERESZTREJTVÉNY 



CHARLES I. (I. KÁROLY 
angol király) (1600 — 1649) 

1636. szeptember 3-án írt levelében a 
következő, megszívlelésre méltó és sokfé¬ 
le variációban közszájon forgó figyelmez¬ 
tetést intézte Lord Wentsworthoz: (lásd 
vízszintes 6., 76. sorokat). 

VÍZSZINTES: 1. Repülőtér, ezen a cí¬ 
men adja a televíziós 2-es csatornája e 
műsort. 11. Többo. 13. Arab író. 14. Ket¬ 
tős betű. 16. Palládium vegyjele. 17. 
Menyasszony. 19. Rénium vegyjele. 20. 
Régi kettős betű. 21. Nagy nép. 23. Ilyen 
centrum is létezik. 24. Van ilyen nép is. 
26. Oly keverve. 23. Baskíria fővárosa. 
30. Állófilm. 31. Ausztriai és norvégiai 
gépkocsik jelzései. 32. Fordítva: hét ve¬ 
zéregyike. 35. Volt magas rang. 36. Kam¬ 
bodzsai és máltai gépkocsik jelzései. 37. 
Ilyen bankjegy is van. 38. Ilyen világ is 
van. 40. Áz Aggteleki cseppkőbarlang 
szlovákiai ága. 43. Nem közlekedési esz¬ 
közön. 45. Vatikáni és svédországi gépko¬ 
csik jelzései. 46. Ilyen fordulás is van. 48. 
Okozat szülője. 49. Helyhatározó. 51. 
Egyforma betűk. 53. Helység Heves me¬ 
gyében. 55. Egyik oldal. 57. Nana írója. 
58. Város Prágától dél-keletre. 60. Közle¬ 
kedési eszköz. 62. Vaspálya. 64. Kínai 
hosszmérték. 66. Betűvető. 68. Idegen kö¬ 
tet. 69. Tíz. 70. Ritka férfinév. 72. Van 
ilyen bányászat is. 74. Kémiai elem. 75. 
Kis csapategység. 

FÜGGŐLEGES: 1. Új-Zéland fővá¬ 
rosa. 2. Részvénytársaság. 3. Dohányzó 
eszköz. 4. Ipari város. 5. Vés. 7. Fordított 
kicsinyítőképző. 8. Omladék. 9. Kertfajta. 
10. Római 501. 12. Német erő. 15. Város 
Svájcban. 17. Becézett szülő. 18. Azonos 
a 17. vízszintessel. 20. Sáv. 22. Kettős 
betű. 25. Juttat. 27. Férfinév becézve. 29. 
Van kicsi is meg nagy is. 32. Test motorja. 
33. Ötórai ital. 34. Pest megyei helység. 


35. Testrész. 37. Betű kimondva. 39. 
Rangjelző. 41. Kitüntetés. 42. Tetejére. 
44. Kenőanyag. 46. Zsargon italos. 47. 
Idegen férfinév. 49. Kazeinből és formal¬ 
dehidből készíteti műszaru. 50. Becézett 
Aladár. 52. Fél ital. 54. Egyforma betűk. 
55. Azonos a vízszintessel. 56. Az idealis¬ 


ta rendszerekben: az elvont világtörvény. 
59. Tud. 61. Torta töltelék. 63. Itt született 
Beethoven. 65. Papírmérték. 67. Ilyen tá¬ 
madás is létezik. 68. Évszak. 69. Betűt 
vet. 71. Kémiai elein. 73. Végtelen uralko¬ 
dó volt. 74. Csak félig kord. 75. Szcmc- 
lyesnévmás többese. 


Keresem a GP-100VC prin¬ 
ter magyar leírását vételre 
vagy másolásra. Szabó Já¬ 
nos, 1173 Bpest, Gyökér u. 
27. fszt. 4. 

C o4 programok cseréje! 
Csak lemezen! Listát kérek és 
küldök! Cím: Papp Tibor, 1195 
Budapest, Batthyány u. 4. 

Megjelent a CMB. Olcsó 
programok eladása C-64-re. 
A választék óriási. Válaszbo¬ 
rítékért lista. 2723 Nyáregy¬ 
háza, Kossuth Lajos u. 61. 

o 


Eladó C-64, Anitech moni¬ 
tor, magnó, joy, 3 super ga- 
mes, tartozékok, játékok. 
Nagy Csaba, 1399 Budapest, 
Pf.: 701/893. 

Eladók C-64 bővítők 700- 
1600 Ft, Final III. 3000 Ft, 
Epromégők 2100 Ft. Válasz- 
borítékért ismertető. Mikro- 
klub, 8100 Várpalota, Pf.: 65. 

Amiga programokat veszek 
lehetőleg olcsón. Hajdany 
Ádárn, 1149 Budapest, Újvi¬ 
lág u. 39/b. Tel.: 1-632-977. 


C-64-es programok eladók 
lemezen és eladó egy C-64- 
hez való magnó. Érdeklődni: 
Pád Softwer, 6772 Deszk, 
Alkotmány u. 4. 

Névsorba szedést vállalok 
idegen nyelven is, szótár jel¬ 
legűt is. Bagdács Lajos, 4130 
Derecske, Dózsa Gy. u. 15. 

Keresem a DATA BECKER 
sorozat GRAFIKA C-64-en 
című könyvet. Bódi László, 
Budapest VII., Dózsa 
György út 14. IlI.e. 30. 


Keresem az EDDIFOX nevű 
programot C-64-re lemezen. 
Pusztai Zoltán, 2890 Tata, 
Madách u. 2. 

Eladók Plus/4 + magnó + 2 
joystick + junoszty tv + sok 
program + felhasználói 
könyvek kitűnő állapotban. 
Chriss, 1151 Budapest, 
Árokhát u. 2. 

Felhasználói és játékprogra¬ 
mok lemezen. Adás-vétel-cse- 
re. Válaszborítékért lista! 450 
Ft. 1701 Budapest, Pf.: 229. 
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APRÓCSKÁK 


0 ^ 

Mindenki másként 
csinálja. 


A C-Újság 1992/5. számának 30. oldalán (bal alsó sarok) 
egy rövid írás olvasható Kézbcntartott joystick címmel. Ehhez 
a témához szeretnék néhány gondolatot fűzni. 

Mindenekelőtt azt a nagyon fontos tényt kell megemlíteni, 
hogy ,,... a botkormány ugyanazokat a CIA biteket használja, 
amelyeket az operációs rendszer a billentyűzet lekérdezése köz¬ 
ben igénybe vesz.”ll] 

Mindez azt jelenti, hogy a botkormány állását csak prog¬ 
ramból lehet lekérdezni. Előbb azonban meg kell „nyitni” a 
joystick-portokat a POKE 56322,224 utasítással. (Ha ismét a 
billentyűzetet akarjuk használni, az említett címre 255-öt kell 
írni.) 

Megnézve a joystick csatlakozók bekötését [21, az 1—4 pon¬ 
tok szolgálnak az irány kijelölésére, míg a 6. pontra a tűzgomb 
csatlakozik. (Témánk szempontjából a többi pontot ignorál- 
hatjuk.) 

A botkormány működése azon alapul, hogy az egyes irányo¬ 
kat definiáló pontot (pontokat) a joystick kapcsolói 1-es logikai 
szintről 0 logikai szintre viszik. (Magyarán „lelestelik”.) Emiatt 
a 4 bites kapu által reprezentált 4 helyiértékű bináris szám értéke 
megváltozik (csökken). 

Ezt a változást érzékeli az operációs rendszer, és ezt az érté¬ 
ket olvashatjuk ki decimális alakban. Ha azonban jól értelmez- 


q 10 print"Sl:ytl)r-255sy (2)=i27íZ»S6t22 

20 def -f : n jay (;<) and (y (:<)-peek <z~k > ) s goto 40 

■S 0 p ü k t* 2.1.4 f: uiy i» íiiíü6 40 s r ©t ur n 
^ 40 input"jay";x 
50 poke z,224 
60 w»-fn jay<x) 

70 i-f W\ — 10 then ;I0W 
O R0 f~4s gosub 30:print "Tuuuuz ! M 
90 w-w- í. 6 : f*«4 s gasub 30: pr i nt " 

100 f ■■•■6 : gosuh 30: pr- x n t «>tr :£ (w) ; " 

o 

r e «i d y ■ 


o 

o 

" : got cj 60 


Eladó PLUS/4-es alapgép + 
magnó + programkazetták + 
zöld monitor. Ára: 12.000 
Ft. Czifra Zoltán, 5231 
Fegyvernek, Kiss János u. 
18/a. 

C-64-es programokat cseré¬ 
lek, veszek, eladok lemezen 
és kazettán. Válaszborítékért 
listát küldök és kérek. Pocsai 
Gábor, Budapest, Markó u. 
7. 1/2 em. 3. 

Tel.: 1-314-484 

Játék és felhasználói progra¬ 
mok eladók! Bélyeggel ellá¬ 
tott válaszborítékért listát 
küldünk. Kérjük tüntesse fel 
a gépe típusát és a hozzá tar¬ 
tozó perifériákat. (Vízhatlan 
csomagolás, kedvezmények!) 


(Amiga) FR1END TWO 
CREW, 1399 Budapest, Pí.: 
701/55, 

(C-64) Borbély Balázs - 
BUMBLE BEE, 1116 Buda¬ 
pest, Sáfrány u. 44. Tel.: 
162-7724, 

(IBM) PROSZOLG, 1399 
Budapest, Pf.: 636. 

Vennék C-16 alapgépre já¬ 
ték, oktató és szövegszer¬ 
kesztő programot kazetta 
cartridgc. Lórik Ernő, 3524 
Miskolc, Hajós u. 4. 

C-64 program 3 Ft-ért? Igen! 
Lemezre és kazettára, játé¬ 
kok, demók felhasználóik 
csak nálam! Cím: Kovács 
Krisztián, 6750 Szeged-Al- 
győ, Bartók Béla u. 6. 


hető és kezelhető értéket akarunk kapni, a kiolvasott decimális 
számot konvertálni kell. Ezt a célt szolgálja a demo-rutin 20. so¬ 
rában található függvény. Tekintettel arra, hogy a két kapu „nyu¬ 
galmi értéke” különböző, ezeket az értékeket az Y(l) és Y(2) 
konstansokkal „visszük be” a függvénybe. 

A rutin futtatása alatt, ha a botkormányt az óra járásával 
megegyező irányba mozgatjuk, rendre az. alábbi értékeket kap¬ 
juk: E = \, ÉK = 9. K = 8, DK = 10, D = 2, DNy = 6, 
Ny - 4, ÉNy = 5. (Alaphelyzet = 0.) 

Ha megnyomjuk a tűzgombot, a fenti értékek 16-tal na¬ 
gyobbak lesznek. Ez esetben az irányra jellemző szám lelett 
megjelenik a villogó „Tuuuuz !” felirat. 

A kiolvasott és az esetleges „tűzparancstól megtisztított" 
értéket már felhasználhatjuk egy ON GOTO (GOSUB) utasítás¬ 
ban. Két dologról azonban NE feledkezzünk meg: 
ad 1. A botkormány alaphelyzetében W = 0 
ad2. Az 1—10-ig terjedő számsor nem folytonos, hiányzik 
a 3-as és a 7-es érték. Az ÖN GOTO (GOSUB) utasítás sorszám¬ 
listájában a 3. és 7. helyet töltsük ki. Bármilyen sorszámot írha¬ 
tunk. ugyanis a vezérlés sohasem kerülhet oda. 

A hiátusoknak egyszerű oka van, hiszen például a botkor¬ 
mány nem lehet egyszerre E-i és D-i irányban. 

Felhasznált irodalom: 11 ] A Commodore 64-es belső fel- 
q építése. DALA BECKER—NO¬ 

VOTRADE Kiadó (1985). 

121 COMMODORE64. Felhaszná¬ 
lói kézikönyv. NOVOTRADE 
Kiadó (1988). 

M. SZ. S. 


Az EPROM BT. A Commodore 64-re az ismert D&T cart- 
ridge családja mellett kifejlesztett egy teljesen új, két rész¬ 
ből álló modulrendszert. 

Részei: 

1./ BASIC MODUL 

Jelölése: BM. 

Helye: a C-64 ROM bővítő portja. 

Tartalma: - NYÁK csatlakozó, a cserélhető 

modulok számára, 

- RÉSÉT gomb. 

Fogadhat: 1 vagy 2 — csak cégünk által progra¬ 
mozott — IC-t 

A cserélhető modul helyes csatlakoztatása mechani¬ 
kusan biztosított. 

2.1 CSERÉLHETŐ MODUL 

Helye: a BASIC MODUL NYÁK csatlakozója. 

Megnevezése: játékprogramok esetén 
GAME MODUL. 

1 IC-vel 85—100 Kbyte terjedelem, 

4 változat, 4—5 program/változat. 

2 IC-vel 170—200 Kbyte terjedelem, 

6 változat 8—10 program/változat. 
Szoftveres menüváltás és modulkikapcsolás. 

Minden termékre 6 hónap garancia + használati útmutató. 
Árak: BASIC MODUL 1100 Ft, 

GAME MODUL 1000 Ft 1 IC-vel, 

2000 Ft 2 IC-vel. 

Az árak az ÁFA-t tartalmazzák! 

Megrendelhető: EPROM BT. 

1046 Budapest, Török I. u. 25. 

Tel.: (1) 1690-779 Postai utánvét! 
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EGYESÜLET 


ACOMP Kft. 

ÁPRILISI 
60 Ft-os 

vásárlási utalványa 

Beváltható 

készpénzes vásárlás esetén a 
1141 Budapest, Álmos vezér útja 17. 
szám alatti üzletben. 

Érvényes: 1993. április 30-ig. 

Egy személy részére egyszeri vásárláshoz 
egy utalvány használható fel! 


MAKROVILÁG 

utazási iroda 

Beváltható 

utazás megrendelése esetén 

az Üllői úti főirodában az alábbiak szerint: 

5 000 Ft-lg — 200 Ft kedvezmény 

10 000 Ft-ig — 400 Ft kedvezmény 

20 000 Ft-lg — 500 Ft kedvezmény 

20 000 Ft felett — 1000 Ft kedvezmény 
Csoportok jelentkezése esetén további 
kedvezményekről az Irodában lehet tárgyalni 


( W*mwt) 

ÁPRILISI 

60 Ft-os 
vásárlási utalvány 

Beváltható készpénzes 
vásárlás esetén a 2C Áruházban. 
Bp. XIII., Balzac u. 35. 

Érvényes: 1993. április 30-ig. 


HOBBI ELEKTRONIKA 

ÁPRILISI 

vásárlási utalványa 

Értéke: 

5000 Ft-ig 80Ft, 

5000 Ft felett 10% 

Beváltható a Hobbi Elektronika Kft.-nél. 
Budapest VII., Dózsa György u. 16. 
Telefon: 122-8892 

Egy személy részére egyszeri vásárláshoz 
egy utalvány használható fel! 


A NOVOTRADE SZERVÍZ Kft. az alább felsorolt szervizeiben 
mindenféle szervizszolgáltatás munkadíjából 10% kedvez¬ 
ményt ad az egyesületi tagoknak. 


1083 Budapest, Szigony u. 9. 

3525 Miskolc, Fazekas u. 1 — 3. 

5600 Békéscsaba, Bartók B. u. 37. 
6724 Szeged, Csongrádi sugárút 76. 
8000 Székesfehérvár, Rádió u. 15/A. 
9700 Szombathely, Szalonak u. 31. 


Tel.: 134-3153 
Tel.: 46/321-488 
Tel.: 66/327-195 
Tel.: 62/313-377 
Tel.: 22/319-765 
Tel.: 94/14-519 


Igazolás: a javítandó berendezés leadásakor egyesületi igazolvánnyal. 
A kedvezmény többször Is Igénybe vehető. 



Az Országos Commodore Egyesület szolgáltatásai 

Egyesületi tagoknak 20% kedvezmény: 


VC—20 memóriabővítés 3—27 kByte-os: kiépítéstől függő 

C—16, C—116 memóriájának bővítése 64 kByte-ra: 3500 Ft 

C—16 belső 16 kByte-os EPROM bővítés: 1450 Ft 

C—16 belső 32 kByte-os EPROM bővítés: 2900 Ft 

C—16 belső 8 kByte-os SOFT—ROM bővítés: 2800 Ft 

C—16 belső 32 kByte-os SOFT—ROM bővítés: 4000 Ft 

C—16 8 kByte-ról 32 kByte-ra átalakítás: 2000 Ft 

C—16 és 1541 kompatibilis lemezegység párhuzamosítása: 3200 Ft 

SOFTROM modul 32K. kikapcsoláskor sem felejt C-16, C-116, +4 5000 Ft 

FÉK C—16, C—116, +4 potméteres sebességváltoztatás 

0%-tól 100%-ig fokozatmentesen 2000 Ft 

TTL IC-teszter (Cartridge+lemezen a program) 4300 Ft 

+4, C—16, C—116 UNI—ROM modul különféle kiépítésekben: 

— 8 kByte SOFT—ROM 3400 Ft 

— 16 kByte SOFT—ROM 4000 Ft 

— 8 kByte SOFT—ROM 16 kByte EPROM 4400 Ft 

— 16 kByte SOFT—ROM 16 kByte EPROM 5000 Ft 

— 16 kByte EPROM 2200 Ft 


Egyesület tagoknak 30% kedvezmény: 


Speeddos (átkapcsolható) operációs rendszer beépítése 

(C64 átalakítás, lemezegység átalakítás + párhuzamos kábel) 5000 Ft 

1541 kompatibilis lemezegységbe elektronikus lemezlyukasztó beépítése 900 Ft 

PAGEFOX magyar ékezetes kiadvány-szerkesztő cartridge 
(a teljes A/4-es oldal kinyomtatásához 640 pont/soros nyomtató szükesé- 
ges minimum, pl. Citizen 120D) 5500 Ft 

FASTLOAD cartridge (lemezes gyorstöltő, másoló, monitor) 1500 Ft 

TTL IC-teszter cartridge + program 4300 FT 

288/256 Kbyte-os eprombank (vezérlő eprommal) 5000 Ft 

Epromégető (2716-tól 27512-ig) 5000 Ft 

C64-hez tároló oszcilloszkóp 8000 Ft 

C64-bővítő-port elosztó (egyszerre 4 db cartridge lehet a gépben, melyeket 
gombnyomásra lehet kapcsolni) 7500 Ft 

C64 USER - CENTRONICS nyomtatókábel (GEOS kábel) 1500 Ft 

256 K RAM-diszk (256 Kbyte RAM-mal) 14000 Ft 

256 K RAM-diszk (64 Kbyte RAM-mal) 9000 Ft 

2x64 Kbyte-os cartridge igény szerinti programokkal feltöltve . 4.300 Ft 

64 Kbyte-os cartridge igény szerinti programokkal feltöltve 3000 Ft 

Képújság (teletext) dekóder C-64-re 10000 Ft 

Epromok programozása meglévő programokkal, vagy saját hozott progra¬ 
mok beégetésével 2716-tól 27512-ig az eprommal együtt egységesen 700 Ft 

Árainkat az alkatrészárak változásai befolyásolhatják. 

A fenti bővítések megrendelhetők levélben az O.C.E. címén, valamint sze¬ 
mélyesen a havonta rendezendő klubdélelőttön, ahol rendszeres bemutatót 
is tartunk. 


Postázás esetén 100 Ft postaköltség kerül felszámításra. 

A kedvezmény igénybevételéhez az O.C.E. tagsági igazolvány bemutatása 
szükséges. 
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SZERVIZ Kft. 











S yQuest 


Hivatalos magyarországi disztribútora: 



Cím: 1053 Budapest, Henszlmann I. u. 9 
Telefon: 117-4144 Telefax: 117-9692 


Cserélhető lemezes winchester! 


Szervizeinkben és szerződött viszonteladóinkon keresztül az alábbiakat forgalmazzuk: 


SQ 555 

44 MB-os 5V 4 

SCSI drive, 

SQ 400 lemez 

( 44 MB) 

SQ 5110 

88 MB-os 5V 4 

SCSI drive, 

SQ 800 lemez 

( 88 MB) 

SQ 3105A 

105 MB-os 3V 2 

AT-BUS drive, 

SQ 310 lemez 

(105 MB) 

SQ 2542A 

42 MB-os 2 1 /2 

AT-BUS drive, 

SQ 240 lemez 

( 42 MB) 


Számítógépszerviz 

Személyi számítógépek és perifériák javítását, karbantartását továbbra is tőlünk 
rendelje meg! Gyors, pontos és megbízható! Örök garanciát kap, 
ha átalánydíjas javítási és karbantartási szerződésformánkkal 
védi nagyértékű gépei műszaki állapotát. 

Várjuk jelentkezését az alábbi szervizeinkben: 


1083 Budapest, 

3525 Miskolc, 

5600 Békéscsaba, 
6724 Szeged, 

8000 Székesfehérvár, 
9700 Szombathely, 


Szigony u. 8. 
Fazekas u. 1-3. 
Bartók B. u. 37. 
Csongrádi sgt. 76. 
Rádió u. 15/a. 
Szalonak u. 31. 


Tel.: 1343-153 
Tel.: 46/321-488 
Tel.: 66/327-195 
Tel.: 62/313-377 
Tel.: 22/319-765 
Tel.: 94/14-519 


NOVOTRADE SZERVIZ KFT. 

















Ára: 136 Ft 




SZÁMÍTÁSTECHNIKAI KFT. 


1141 Budapest, Álmos vezér útja 17., Tel.: 183-1817, Fax: 251-2523 


Commodore Amiga 500 35 900 Ft 

Commodore Amiga 500 Plus 36 900 Ft 

Commodore Amiga 600 36 900 Ft 

Commodore Amiga 1200 59 900 Ft 

Commodore Amiga 4000/040/6MB/120MB 285000 Ft 
+ 4 MB RAM modul 29 000 Ft 

Commodore 1084 s Stereo-Color monitor 29 900 Ft 
Commodore A-520 TV-Modulator 3 200 Ft 

Commodore C-64 II 9 990 Ft 

Commodore C-64 + Joystick + játék 9 900 Ft i 
Commodore C-128D 24 990 Fá 

Commodore 1541 II Floppy 12 750 H 

Commodore 1802 monitor 24 900 Ft 

Commodore Datassette 1 990 Ft 

Commodore MPS 123^^^^^ 22 900 Ft 

Philips 8833 II. Stereo-Color monitor .^29 90Q Ff : 
512 Kb órás menióriabővítő 3 200 Ft 

2.0 Mb órás memóriabővrtó 14 900 Ft 

1.0 Mb-os chip bővítő Amiga 500 Plus-ba 6 900 Ft 
1.0 Mb-os órás chip bővítő Amiga 600-ba 7 900 Ft 

3.5" külső floppy drive 9 490 Ft 

Noris Amiga 500 porvédő 990 Ft 

Noris C-64 II porvédó 790 Ft 

Quickshot Apache Joystick 890 Ft 

Ouickshot Phyton Joystick 990 Ft 

Quickshot QS - 113 analóg joystick 990 Ft 

Quickshot QS - 123 analóg joystick 1 290 Ft 

Noris Mouse pad 250 Ft 

Noris MB 80 3.5” lemeztartó 69<nP 

Noris DB 100 5.25” lemeztartó 690 Ft 

Noris üveg 14” monitorfilter 1 990 Ft 

Samsung 24 tűs printer 37 500 Ft 


NoName 3.5" DSDD lemez 

NoName 3.5” DSHD 


Maxell 

Maxell 

/Maxell 

Profex 

Profex 

Profex 

Profex 



Action 


NoName 5.25” DSDD lemez 
NoName 5.25” DSHD lemez 
3M 3,5” DSDD lemez 
Maxell . 3.5” MF2-DD lemez 
3.5" MF2-HD lemez 
5.25” MD2-D lemez 
5.25” MD2-HD lemez 
3.5” DSDD leme? (11 
1D 

# 

DSHD lemez (11 darabos) 
5.25” MD 2DD lemez 
teplay MK III (Amiga) + könyv 

4 Player Adapter - 4 Joystick csatoló 
Action Replay MK VI (C-64) kézikönyvvel 
C-64 midi szoftverrel 
C-64/C-128 mouse 

Swifty Amiga/Atari Mouse (3 gombos) 
Mouse/Joystick automatikus kiválasztó 
Midi Amiga Interface 
Handyscanner Amigához 
Boot Selector Amigához 
Stereo hangdigitalizáló Amigához 
Trackball Amigához 
Képdigitalizáló + RGB Splitter 
Rochard HD kontroller A500/A500+ 

+ 80 Mbyte Winchesterrel 
+ 1 Mbyte SIMM Ram 
Sound Blaster PRO Deluxe 
Amiga Magazin / Power Play újságok 


550 Ft 
850 Ft 
220 Ft 
430 Ft 
890 Ft 
990 Ft 
1 690 Ft 
690 Ft 
890 Ft 
790 Ft 
r 1 390 Ft 
350 Ft 
470 Ft 
450 Ft 
9 990 Ft 

1 890 Ft 

5 900 Ft 

6 500 Ft 

2 500 Ft 
2 500 Ft 

1 990 Ft 

2 990 Ft 
13 900 Ft 

1 490 Ft 
6 900 Ft 

3 590 Ft 
12 900 Ft 
24 990 Ft 
50 900 Ft 

4 990 Ft 
17 900 Ft 

450 Ft 


Áraink az 1 év garanciát és az ÁFA-t tartalmazzák! 


Nyitvatartás 9—18 óráig, szombaton: 9—13 óráig. 



Az árajánlatban szereplő adatok, árak változtatásának jogát fenntartjuk! 











